isolated; it's begin0. I need to fix begin0
This commit is contained in:
parent
1ab9eeee78
commit
5612573657
|
@ -611,6 +611,8 @@
|
|||
(let ([evaluate-and-save-first-expression
|
||||
(let ([after-first-seq (make-label 'afterFirstSeqEvaluated)])
|
||||
(append-instruction-sequences
|
||||
(make-instruction-sequence
|
||||
`(,(make-Comment "begin0")))
|
||||
;; Evaluate the first expression in a multiple-value context, and get the values on the stack.
|
||||
(compile (first seq) cenv 'val next-linkage/keep-multiple-on-stack)
|
||||
(make-instruction-sequence
|
||||
|
|
Loading…
Reference in New Issue
Block a user