},
Defvar: function (name, desc, val, range)
{
},
Defvar: function (name, desc, val, range)
{
- var vari = new Xex.Variable (name, desc, val, range);
+ var vari = new Xex.Variable (this, name, desc, val, range);
var name = node.attributes['vname'].nodeValue;
if (! name)
throw new Xex.ErrTerm (Xex.Error.NoVariableName, node, '');
var name = node.attributes['vname'].nodeValue;
if (! name)
throw new Xex.ErrTerm (Xex.Error.NoVariableName, node, '');
if (name == 'defun' || name == 'defmacro')
{
name = parse_defun_head (domain, node);
if (name == 'defun' || name == 'defmacro')
{
name = parse_defun_head (domain, node);
parse_defun_body (domain, node);
return new Xex.StrTerm (name);
}
if (name == 'defvar')
{
name = parse_defvar (domain, node);
parse_defun_body (domain, node);
return new Xex.StrTerm (name);
}
if (name == 'defvar')
{
name = parse_defvar (domain, node);
return new Xex.StrTerm (name);
}
return new Xex.Funcall.prototype.Parser (domain, node);
}
for (var n = node; n && n != stop; n = n.nextElement ())
return new Xex.StrTerm (name);
}
return new Xex.Funcall.prototype.Parser (domain, node);
}
for (var n = node; n && n != stop; n = n.nextElement ())
- {
- if (n.nodeName == 'defun' || n.nodeName == 'defmacro')
- {
- var name = parse_defun_head (domain, n);
- MIM.log ('defmacro:' + name);
- }
- }
+ if (n.nodeName == 'defun' || n.nodeName == 'defmacro')
+ parse_defun_head (domain, n);
parser.call (this, node);
}
this.load_status = MIM.LoadStatus.Loaded;
parser.call (this, node);
}
this.load_status = MIM.LoadStatus.Loaded;