9 lines
No EOL
234 B
Text
9 lines
No EOL
234 B
Text
let test =
|
|
match (Here ("O", "K")) {
|
|
| Here (x, y) ->
|
|
print_string ("This test is ");
|
|
print_string (x);
|
|
print_string (y);
|
|
print_string (".\n")
|
|
| NotHere -> print_string ("This test is KO.\n")
|
|
} |