/*
* $Id: NewNode.java,v 1.19 2002/09/16 08:05:05 jkl Exp $
*
* Copyright (c) 2002 Njet Communications Ltd. All Rights Reserved.
*
* Use is subject to license terms, as defined in
* Anvil Sofware License, Version 1.1. See LICENSE
* file, or http://njet.org/license-1.1.txt
*/
package anvil.script.expression;
import anvil.core.Any;
import anvil.ErrorListener;
import anvil.script.ClassType;
import anvil.script.CompilableFunction;
import anvil.codec.Code;
import anvil.codec.ConstantPool;
import anvil.script.compiler.ByteCompiler;
import anvil.script.Context;
import anvil.script.Type;
import anvil.script.Module;
import anvil.script.Grammar;
import anvil.script.NativeJava;
import java.io.IOException;
/**
* class NewNode
*
* @author: Jani Lehtim�ki
*/
public class NewNode extends MultiParent
{
protected ClassType _context;
protected ClassType _class;
protected CompilableFunction _constructor = null;
public NewNode(ClassType context, ClassType clazz, CompilableFunction ctor, Parent parameters)
{
super(parameters);
_context = context;
_class = clazz;
_constructor = ctor;
}
public int typeOf()
{
return Node.EXPR_NEW;
}
public boolean isConstant()
{
return false;
}
public Node optimize()
{
optimizeChilds();
return this;
}
public void compile(ByteCompiler context, int operation)
{
Code code = context.getCode();
ConstantPool pool = code.getPool();
if (_class instanceof NativeJava) {
if (hasSplices()) {
code.getstatic(pool.addFieldRef(_class.getTypeRef(pool),
"__class__", "Lanvil/script/compiler/NativeClass;"));
code.aload_first();
context.compileArgumentList(getChilds(0));
code.invokevirtual(pool.addMethodRef(
"anvil/script/compiler/NativeClass", "newInstance",
"(Lanvil/script/Context;[Lanvil/core/Any;)Lanvil/core/Any;"));
} else {
context.compileCall(_constructor, getChilds(0));
}
} else {
int classindex = _class.getTypeRef(pool);
boolean has_splices = hasSplices();
if (has_splices) {
code.getstatic(pool.addFieldRef(classindex, "m_"+_constructor.getName(), "Lanvil/script/Function;"));
code.aload_first();
}
code.anew(classindex);
code.dup();
ClassType[] clazz_parents = _class.getEnclosingClasses();
int n = clazz_parents.length;
for(int i=0; i<n; i++) {
context.accessInstance(_context, clazz_parents[i]);
}
code.invokespecial(_class.getConstructorReference(pool));
if (has_splices) {
context.compileArgumentList(getChilds(0));
code.invokeinterface(pool.addInterfaceMethodRef("anvil/script/Function", "execute",
"(Lanvil/script/Context;Lanvil/core/Any;[Lanvil/core/Any;)Lanvil/core/Any;"));
} else {
context.compileArgumentList(_constructor, getChilds(0));
code.invokevirtual(_constructor.getTypeRef(pool));
}
}
if (operation == GET_BOOLEAN) {
context.any2boolean();
}
}
}