},
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);
this.variables[name] = vari;
return vari;
},
values = {};
for (var elt in this.variables)
{
- if (! this.variables[elt].val)
- alert ('unknown value of ' + elt);
- else
+ //if (! this.variables[elt].val)
+ //alert ('unknown value of ' + elt);
+ //else
values[elt] = this.variables[elt].val.Clone ();
}
return values;
var name = node.attributes['vname'].nodeValue;
if (! name)
throw new Xex.ErrTerm (Xex.Error.NoVariableName, node, '');
- var vari = domain.variables['name'];
+ var vari = domain.variables[name];
var desc, val, range;
if (vari)
{
if (name == 'defun' || name == 'defmacro')
{
name = parse_defun_head (domain, node);
- MIM.log ('defmacro:' + name);
parse_defun_body (domain, node);
return new Xex.StrTerm (name);
}
if (name == 'defvar')
{
name = parse_defvar (domain, node);
- MIM.log ('defvar:' + name);
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);
var terms = null;
for (var n = node; n && n != stop; n = n.nextElement ())
{
function Finsert_candidates (domain, vari, args)
{
var ic = domain.context;
- var candidates = new Candidates (args, column);
+ var candidates = new MIM.Candidates (args, column);
ic.insert (candidates.Current (), candidates);
return args[0];
}
if (vari != null)
this.domain.Defvar (vname);
}
- Xex.Term.Parse (this.domain, node);
+ vname = Xex.Term.Parse (this.domain, node)
+ MIM.log ('var:' + this.domain.variables[vname.val].name);
}
}
parsers['command-list'] = function (node)
parser.call (this, node);
}
this.load_status = MIM.LoadStatus.Loaded;
- MIM.log ('loading done: ' + this.lang + '-' + this.name + '-' + this.extra_id);
return true;
}
}