[bug] Unwind/Protect is not ready to be tested yet.
This commit is contained in:
parent
32edb45f84
commit
edf8cd2c3c
|
@ -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)
|
Loading…
Reference in New Issue