Testing fix for issue #537

This commit is contained in:
Justin Ethier 2024-05-20 19:31:38 -07:00
parent 6b556d3a7a
commit 1ce4979658

View file

@ -99,7 +99,9 @@
(cond
((application? exp)
(cond
((compound-procedure? (car exp))
((or (primitive-procedure? (car exp))
(compound-procedure? (car exp))
(procedure? (car exp)))
(cons
(car exp)
(map