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/46-match-05.eval.hopix.human-readable
2023-10-25 15:16:53 +02:00

7 lines
No EOL
215 B
Text

let test =
match (Deep (Deep (Deep (Inside ("OK"))))) {
| Deep (Deep (Deep (Inside (you_find_me)))) ->
print_string ("This test is ");
print_string (you_find_me);
print_string (".\n")
}