public object Evaluate(Machine machine, ValueEnvironment environment)
{
string nsname = null;
if (string.IsNullOrEmpty(this.symbol.Namespace))
{
// TODO this lookup should be for special forms
if (machine.Environment.IsDefined(this.symbol.Name))
return machine.Environment.GetValue(this.symbol.Name);
// Test if it is a Type
// TODO import treatment
if (this.symbol.Name.IndexOf('.') > 0)
{
Type type = Utilities.GetType(this.symbol.Name);
if (type != null)
return type;
}
if (environment.IsDefined(this.symbol.Name))
return environment.GetValue(this.symbol.Name);
nsname = (string)environment.GetValue(Machine.CurrentNamespaceKey);
}
else
nsname = this.symbol.Namespace;
return machine.GetVariableValue(nsname, this.symbol.Name);
}