From 1a39672b01dc236068475e2d1a8a6f21814cba7e Mon Sep 17 00:00:00 2001 From: Artyom Shalkhakov Date: Sat, 22 Dec 2018 14:15:51 +0200 Subject: More tests. --- tests/caseMod.ur | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) (limited to 'tests/caseMod.ur') diff --git a/tests/caseMod.ur b/tests/caseMod.ur index 0a870160..15a7e07a 100644 --- a/tests/caseMod.ur +++ b/tests/caseMod.ur @@ -24,15 +24,15 @@ val toString = fn x => | C B => "C B" | D => "D" -val rec page = fn x => +val rec page = fn x => return {cdata (toString x)}

Again! - + -val main : unit -> page = fn () => +val main : unit -> transaction page = fn () => return

C A

C B

- + -- cgit v1.2.3