suzanne.soy/whalesong
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

evaluation still broken.

Browse Source
This commit is contained in:
Danny Yoo 2013-04-16 17:45:57 -06:00
parent 0428a021bd
commit c5ccbe32e5
2 changed files with 6 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
whalesong/compiler/compiler.rkt
View File

@ -109,11 +109,11 @@
(make-PopEnvironment (make-SubtractArg (make-Reg 'argcount) (make-Const 1)) (make-PopEnvironment (make-SubtractArg (make-Reg 'argcount) (make-Const 1))
(make-Const 0)) (make-Const 0))
after-pop-prompt: after-pop-prompt:
last:)))) last:
;; Finally, return to the success continuation on the stack.
(make-AssignImmediate 'proc (make-ControlStackLabel))
(make-PopControlFrame)
(make-Goto (make-Reg 'proc))))))

1
whalesong/repl-prototype/htdocs/repl.js
View File

@ -162,6 +162,7 @@
var compiledCodes = compiledResult.compiledCodes; var compiledCodes = compiledResult.compiledCodes;
forEachK(compiledCodes, forEachK(compiledCodes,
function(code, k) { function(code, k) {
console.log(code);
// Indirect eval usage here is deliberate. // Indirect eval usage here is deliberate.
var codeFunction = (0,eval)(code); var codeFunction = (0,eval)(code);
var onGoodEvaluation = function() { var onGoodEvaluation = function() {