From e4725c07ee3e7e3fc010df418d16f37c39b0af0f Mon Sep 17 00:00:00 2001 From: Péter Diviánszky Date: Wed, 11 May 2016 20:57:07 +0200 Subject: mutual function definitions --- testdata/id.out | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) (limited to 'testdata/id.out') diff --git a/testdata/id.out b/testdata/id.out index e9d1758f..c964ee71 100644 --- a/testdata/id.out +++ b/testdata/id.out @@ -1,7 +1,6 @@ main is not found ------------ desugared source code -main' - = _lhs main' (_rhs let a = _lhs id' (_rhs \(b :: _) -> b) in (a 4.0, a True)) +main' = _lhs main' (_rhs let a = \(b :: _) -> b in (a 4.0, a True)) ------------ core code main' :: (Float, Bool) main' = _rhs (4.0, True) -- cgit v1.2.3