From b0c42f8ad5f89be748741a8dd2c17bfe1aa3d0eb Mon Sep 17 00:00:00 2001 From: Jan Tuomi Date: Wed, 24 Nov 2021 14:17:53 +0200 Subject: Fix bug in reduce Application case --- samples/sample1.code | 25 ++++++++++++++++--------- 1 file changed, 16 insertions(+), 9 deletions(-) (limited to 'samples') diff --git a/samples/sample1.code b/samples/sample1.code index 6ac6847..a675849 100644 --- a/samples/sample1.code +++ b/samples/sample1.code @@ -1,11 +1,18 @@ -# f a b = int.eq? a b; -# f 1 2 -# "true" -# "false"; +# result = +# bool.to-string +# (int.eq? 2 2); -compare? a b fn = fn b a; -compare? 2 2 int.eq? - "true" - "false"; +# string.eq? result "true"; -int.eq? "foobar"; \ No newline at end of file +# string.eq? +# (bool.to-string +# (int.eq? 2 2)) +# "true"; + +# string.eq? +# (bool.to-string +# (int.eq? 2 2)); + +string.eq? + (bool.to-string + true); -- cgit v1.3