This repository has been archived on 2024-01-18. You can view files and clone it, but cannot push or open issues or pull requests.
compilation/flap/tests/02-Interpreter/56-if-02.eval.hopix.human-readable

10 lines
192 B
Text
Raw Normal View History

2023-10-25 15:16:53 +02:00
fun f (x) =
if (x >? 0) then {
if (x >? 1) then { "OK" }
else { "KO" }
} else { "KO" }
let test =
print_string ("This test is ");
print_string (f (33));
print_string (".\n")