Allow executing compiled functions

This commit is contained in:
Justin Ethier 2015-02-23 13:37:17 -05:00
parent 3427dd3894
commit a80ad7d65b

View file

@ -355,6 +355,8 @@
(extend-environment (procedure-parameters proc) (extend-environment (procedure-parameters proc)
args args
(procedure-environment proc)))) (procedure-environment proc))))
((procedure? proc)
(apply proc args))
(else (else
(error (error
"Unknown procedure type -- EXECUTE-APPLICATION" "Unknown procedure type -- EXECUTE-APPLICATION"