From 6ecef8f577432ffcaee07f09b2a73d4ea5eb5de2 Mon Sep 17 00:00:00 2001 From: Péter Diviánszky Date: Tue, 10 May 2016 16:32:23 +0200 Subject: explicit lhs marks, first step --- testdata/language-features/basic-values/where04.out | 9 ++++++--- 1 file changed, 6 insertions(+), 3 deletions(-) (limited to 'testdata/language-features/basic-values/where04.out') diff --git a/testdata/language-features/basic-values/where04.out b/testdata/language-features/basic-values/where04.out index 9eb5f765..3095e9d3 100644 --- a/testdata/language-features/basic-values/where04.out +++ b/testdata/language-features/basic-values/where04.out @@ -1,10 +1,13 @@ main is not found ------------ desugared source code -value1 = _rhs let a = _rhs let b = _rhs () in b in a +value1 + = _lhs value1 (_rhs let a = _lhs x (_rhs let b = _lhs y (_rhs ()) in b) in a) -value2 = _rhs let a = _rhs let b = _rhs () in b in a +value2 + = _lhs value2 (_rhs let a = _lhs x (_rhs let b = _lhs y (_rhs ()) in b) in a) -value3 = _rhs let a = _rhs let b = _rhs () in b in a +value3 + = _lhs value3 (_rhs let a = _lhs x (_rhs let b = _lhs y (_rhs ()) in b) in a) ------------ core code value1 :: () value1 = _rhs () -- cgit v1.2.3