org.snapscript.tree.construct.CreateObject Maven / Gradle / Ivy
package org.snapscript.tree.construct;
import static org.snapscript.core.Reserved.TYPE_CONSTRUCTOR;
import java.util.concurrent.Callable;
import org.snapscript.core.Context;
import org.snapscript.core.Evaluation;
import org.snapscript.core.InternalStateException;
import org.snapscript.core.Module;
import org.snapscript.core.Result;
import org.snapscript.core.Scope;
import org.snapscript.core.Type;
import org.snapscript.core.Value;
import org.snapscript.core.ValueType;
import org.snapscript.core.bind.FunctionBinder;
import org.snapscript.tree.ArgumentList;
import org.snapscript.tree.reference.CompiledReference;
public class CreateObject implements Evaluation {
private final ArgumentList arguments;
private final Evaluation reference;
public CreateObject(Evaluation reference, ArgumentList arguments) {
this.reference = new CompiledReference(reference);
this.arguments = arguments;
}
@Override
public Value evaluate(Scope scope, Object left) throws Exception { // this is rubbish
Value value = reference.evaluate(scope, null);
Type type = value.getValue();
Callable call = bind(scope, type);
if(call == null){
throw new InternalStateException("No constructor for '" + type + "'");
}
Result result = call.call();
Object instance = result.getValue();
return ValueType.getTransient(instance);
}
private Callable bind(Scope scope, Type type) throws Exception {
Module module = scope.getModule();
Context context = module.getContext();
FunctionBinder binder = context.getBinder();
Class real = type.getType();
if(arguments != null) {
if(real == null) {
Value array = arguments.create(scope, type);
Object[] arguments = array.getValue();
return binder.bind(scope, type, TYPE_CONSTRUCTOR, arguments);
}
Value array = arguments.create(scope);
Object[] arguments = array.getValue();
return binder.bind(scope, type, TYPE_CONSTRUCTOR, arguments);
}
if(real == null) {
return binder.bind(scope, type, TYPE_CONSTRUCTOR, type);
}
return binder.bind(scope, type, TYPE_CONSTRUCTOR);
}
}