cwebber pushed a commit to branch compile-to-js-merge
in repository guile.
commit b84797947d2d4944902903d1dc14117f2c2faa9c
Author: Ian Price <[email protected]>
AuthorDate: Wed Aug 16 21:44:48 2017 +0100
pop-fluid uses field of frame not fluid
* module/language/js-il/runtime.js(pop-fluid): Fix primitive.
---
module/language/js-il/runtime.js | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/module/language/js-il/runtime.js b/module/language/js-il/runtime.js
index 1052479..5591baa 100644
--- a/module/language/js-il/runtime.js
+++ b/module/language/js-il/runtime.js
@@ -760,7 +760,7 @@ var the_module = new scheme.Fluid(scheme.FALSE);
scheme.primitives["pop-fluid"] = function () {
var frame = scheme.dynstack.shift();
if (frame instanceof scheme.frame.Fluid) {
- frame.fluid.value = frame.fluid.old_value;
+ frame.fluid.value = frame.old_value;
return;
} else {
throw "not a frame";