[bug] Unwind/Protect is not ready to be tested yet.

This commit is contained in:
Elf M. Sternberg 2015-07-31 09:40:51 -07:00
parent 32edb45f84
commit edf8cd2c3c
1 changed files with 1 additions and 1 deletions

View File

@ -38,7 +38,7 @@ describe "Core interpreter #3: Try/Catch with Throw as a function", ->
expect(lisp read "(catch 'bar (funcall throw 'bar 11))").to.equal(11)
it "", ->
expect(lisp read "(catch 'bar (* 2 (funcall throw 'bar 5)))").to.equal(5)
it "", ->in
it "", ->
expect(lisp read "((lambda (f) (catch 'bar (* 2 (f 5))) ) (lambda (x) (funcall throw 'bar x))) ").to.equal(5)
it "", ->
expect(lisp read "((lambda (f) (catch 'bar (* 2 (catch 'bar (* 3 (f 5))))) ) (lambda (x) (funcall throw 'bar x)))) ").to.equal(10)