This is broken, but the stack limit feature works. Some debugging needed.
This commit is contained in:
parent
2536e76617
commit
d1ce893633
12 changed files with 164 additions and 111 deletions
|
|
@ -5,8 +5,8 @@ output=`target/psse 2>/dev/null <<EOF
|
|||
(progn
|
||||
(set! fact
|
||||
(lambda (n)
|
||||
(cond ((= n 1) 1)
|
||||
(t (* n (fact (- n 1)))))))
|
||||
(cond ((= n 1) 1)
|
||||
(t (* n (fact (- n 1)))))))
|
||||
nil)
|
||||
(fact 10)
|
||||
EOF`
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue