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";

Reply via email to