/*
* $Id: InlinedFunctionNode.java,v 1.7 2002/09/16 08:05:04 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.core.runtime.AnyFunction;
import anvil.ErrorListener;
import anvil.script.CompilableFunction;
import anvil.codec.Code;
import anvil.codec.ConstantPool;
import anvil.script.Grammar;
import anvil.script.compiler.ByteCompiler;
import anvil.script.Type;
import anvil.script.Context;
import anvil.script.statements.FunctionStatement;
import java.io.IOException;
/**
* class InlinedFunctionNode
*
* @author: Jani Lehtim�ki
*/
public class InlinedFunctionNode extends Node
{
protected FunctionStatement _context;
protected FunctionStatement _function;
public InlinedFunctionNode(FunctionStatement context, FunctionStatement function)
{
super();
_context = context;
_function = function;
}
public int typeOf()
{
return Node.EXPR_TYPE;
}
public boolean isConstant()
{
return false;
}
public Node optimize()
{
return this;
}
public void compile(ByteCompiler context, int operation)
{
boolean in_class = (_function.getType() != Type.FUNCTION);
String name = (in_class ? "m_" : "f_")+_function.getName();
String signature = in_class ?
"(Lanvil/core/Any;Lanvil/script/Function;Lanvil/script/StackFrame;)V" :
"(Lanvil/script/Function;Lanvil/script/StackFrame;)V";
Code code = context.getCode();
ConstantPool pool = code.getPool();
int anyfunction = pool.addClass("anvil/core/runtime/AnyFunction");
code.anew(anyfunction);
code.dup();
int parent = _function.getParent().getTypeRef(pool);
int field = pool.addFieldRef(parent, name, "Lanvil/script/Function;");
if (in_class) {
code.self();
}
code.getstatic(field);
code.aload(_context.getFrameIndex());
int depth = Grammar.countEscapeDepth(_context, _function);
if (depth >= 0) {
code.iconst(depth+1);
code.invokevirtual(pool.addMethodRef("anvil/script/StackFrame", "getEscape",
"(I)Lanvil/script/StackFrame;"));
}
code.invokespecial(pool.addMethodRef(anyfunction, "<init>", signature));
if (operation == GET_BOOLEAN) {
context.any2boolean();
}
}
}