...
 
Commits (2)
This diff is collapsed.
......@@ -44,7 +44,6 @@ let main (main : unit) (storage : unit) =
| _ -> false
)
(*
&&
( match true with
......@@ -105,5 +104,4 @@ let main (main : unit) (storage : unit) =
| Bytes "0123456789ABCDEF" -> true
| _ -> false
)
*)
)
open SCaml
let main (main : unit) (storage : unit) =
[],
assert (
( match true with
| true -> true
| _ -> false
)
)
open SCaml
let main (main : unit) (storage : unit) =
[],
assert (
( match Int 1 with
| Int 2 -> false
| x -> true
)
)