mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-06-19 18:20:22 +02:00
Code Activity

define! primitive only takes one argument.

Browse source 
* module/language/js-il/runtime.js (define!): Ignore argument.
This commit is contained in:
Ian Price 2017-08-02 22:46:13 +01:00
parent ebe9d00153
commit 30dc57cb04
1 changed files with 2 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

4
module/language/js-il/runtime.js
View file

@ -313,8 +313,8 @@ scheme.Syntax = function (expr, wrap, module) {
};
// Modules
scheme.primitives["define!"] = function(sym, obj) {
var b = new scheme.Box(obj);
scheme.primitives["define!"] = function(sym) {
var b = new scheme.Box(scheme.UNDEFINED);
scheme.env[sym.name] = b;
return b;
};