Fixed the eval-real test
So that it passes provided the answer is right to within one part in a million. Also worked on a solution to returning exceptions from make_stack_frame
This commit is contained in:
parent
7cd2cbf785
commit
5a84f5e305
6 changed files with 52 additions and 20 deletions
|
|
@ -1,4 +1,4 @@
|
|||
(set! fact
|
||||
(lambda (n)
|
||||
(cond ((= n 1) 1)
|
||||
(true (* n (fact (- n 1)))))))
|
||||
(t (* n (fact (- n 1)))))))
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue