5 lines
No EOL
185 B
Text
5 lines
No EOL
185 B
Text
let test =
|
|
match (Here ("OK")) {
|
|
| Here (x) -> print_string ("This test is "); print_string (x); print_string (".\n")
|
|
| NotHere -> print_string ("This test is KO.\n")
|
|
} |