diff options
| author | Joel Martin <github@martintribe.org> | 2014-12-24 21:51:23 -0700 |
|---|---|---|
| committer | Joel Martin <github@martintribe.org> | 2015-01-09 16:16:53 -0600 |
| commit | c150ec41f4f0b8f384f4b1b493a5ca61db42573c (patch) | |
| tree | 8cac11285240725efa7e093a54ef9573dcb2aa44 /tests | |
| parent | 2988d38e84bce8531c0f21fafecb7483593cda73 (diff) | |
| download | mal-c150ec41f4f0b8f384f4b1b493a5ca61db42573c.tar.gz mal-c150ec41f4f0b8f384f4b1b493a5ca61db42573c.zip | |
Haskell: Add steps9-A, metadata, and atoms.
Some refactoring of Core.hs to make better use of pattern matching.
Only remaining thing is exception handling (generic try/throw).
Diffstat (limited to 'tests')
| -rw-r--r-- | tests/step6_file.mal | 12 |
1 files changed, 12 insertions, 0 deletions
diff --git a/tests/step6_file.mal b/tests/step6_file.mal index f76e4f5..d681532 100644 --- a/tests/step6_file.mal +++ b/tests/step6_file.mal @@ -21,6 +21,7 @@ (inc3 9) ;=>12 +;;; TODO: really a step5 test ;; ;; Testing that (do (do)) not broken by TCO (do (do 1 2)) @@ -36,6 +37,7 @@ ;; ;; -------- Optional Functionality -------- +;; Testing comments in a file (load-file "../tests/incB.mal") ; "incB.mal finished" ;=>"incB.mal return string" @@ -43,3 +45,13 @@ ;=>11 (inc5 7) ;=>12 + +;;; TODO: really a step5 test +;; Testing that vector params not broken by TCO +(def! g (fn* [] 78)) +(g) +;=>78 +(def! g (fn* [a] (+ a 78))) +(g 3) +;=>81 + |