need test to make sure we're doing variable capture.
This commit is contained in:
parent
1aeeafd149
commit
283370015d
|
@ -193,7 +193,9 @@
|
||||||
(error 'get-copmiled-procedure-entry)]))]
|
(error 'get-copmiled-procedure-entry)]))]
|
||||||
|
|
||||||
[(MakeCompiledProcedure? op)
|
[(MakeCompiledProcedure? op)
|
||||||
m]
|
(target-updater m (make-closure (MakeCompiledProcedure-label op)
|
||||||
|
(list)))]
|
||||||
|
|
||||||
[(ApplyPrimitiveProcedure? op)
|
[(ApplyPrimitiveProcedure? op)
|
||||||
m]
|
m]
|
||||||
[(LookupLexicalAddress? op)
|
[(LookupLexicalAddress? op)
|
||||||
|
|
Loading…
Reference in New Issue
Block a user