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:
Simon Brooke 2018-12-21 21:35:57 +00:00
parent 7cd2cbf785
commit 5a84f5e305
6 changed files with 52 additions and 20 deletions

View file

@ -1,4 +1,4 @@
(set! fact
(lambda (n)
(cond ((= n 1) 1)
(true (* n (fact (- n 1)))))))
(t (* n (fact (- n 1)))))))