diff options
author | Eduardo Julian | 2014-12-16 02:31:44 -0400 |
---|---|---|
committer | Eduardo Julian | 2014-12-16 02:31:44 -0400 |
commit | d389e983ff4f5d5b01219220ee50f52090816d43 (patch) | |
tree | 88f0bed6c0d804b2b703159f06f7c31a2e759439 /test2.lang | |
parent | 70fe9266ce1ccb4fe964b831a7ab61f0d6262111 (diff) |
Added some pseudo pattern-matching (only extracting simple data, without exploring inner structure or doing any testing).
Diffstat (limited to '')
-rw-r--r-- | test2.lang | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/test2.lang b/test2.lang index 0308a745f..fba03fd8d 100644 --- a/test2.lang +++ b/test2.lang @@ -34,7 +34,9 @@ (_. (_.. System out) (println 2.3)) (_. (_.. System out) (println #"Y")) (_. (_.. System out) (println "this\tis a\nstring")) - ) + (case (#Box "data") + (#Box value) + (_. (_.. System out) (println value)))) (_. (_.. System out) (println "FALSE")))) ## All of these work :D |