cwebber pushed a commit to branch compile-to-js-merge
in repository guile.

commit 2da7a82d9d1aba1e81dd1f359ef5942bc416ca65
Author: Ian Price <[email protected]>
AuthorDate: Thu Aug 3 00:23:45 2017 +0100

    struct-set! primitive returns no values
    
    * module/language/js-il/runtime.js (struct-set!): Don't return a value.
---
 module/language/js-il/runtime.js | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/module/language/js-il/runtime.js b/module/language/js-il/runtime.js
index 8e0480e..e0fc34d 100644
--- a/module/language/js-il/runtime.js
+++ b/module/language/js-il/runtime.js
@@ -476,7 +476,8 @@ scheme.primitives["struct-vtable"] = function(struct) {
 };
 
 scheme.primitives["struct-set!"] = function (struct, idx, obj) {
-    return struct.fields[idx] = obj;
+    struct.fields[idx] = obj;
+    return;
 };
 
 scheme.primitives["struct-ref"] = function (struct, idx) {

Reply via email to