Package org.renjin.sexp

Examples of org.renjin.sexp.SEXP

39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
    super(".Internal");
  }

  @Override
  public SEXP apply(Context context, Environment rho, FunctionCall call, PairList args) {
    SEXP arg = call.getArgument(0);
    assert arg!=null;
    if(!(arg instanceof FunctionCall)) {
      throw new EvalException("invalid .Internal() argument");
    }
    FunctionCall internalCall = (FunctionCall) arg;
    Symbol internalName = (Symbol)internalCall.getFunction();
    SEXP function = Primitives.getInternal(internalName);
    if(function==null || function == Null.INSTANCE) {
      throw new EvalException(String.format("no internal function \"%s\"", internalName.getPrintName()));
    }
    return ((Function)function).apply(context, rho, internalCall, internalCall.getArguments());
  }
View Full Code Here
35
36
37
38
39
40
41
42
43
44
45
    super("if");
  }

  @Override
  public SEXP apply(Context context, Environment rho, FunctionCall call, PairList args) {
    SEXP condition = context.evaluate( call.getArguments().getElementAsSEXP(0), rho);

    // force any deferred operations
    condition = context.materialize(condition);

    if (asLogicalNoNA(context, call, condition)) {
View Full Code Here
39
40
41
42
43
44
45
46
47
48
49
  public SEXP apply(Context context, Environment rho, FunctionCall call, PairList args) {
    if(args == Null.INSTANCE) {
      context.setInvisibleFlag();
      return Null.INSTANCE;
    } else {
      SEXP lastResult = Null.INSTANCE;
      for (SEXP sexp : call.getArguments().values()) {
        lastResult = context.evaluate( sexp, rho);
      }
      return lastResult;
    }
View Full Code Here
TOP

Related Classes of org.renjin.sexp.SEXP

  • org.renjin.AbstractMicroTest
  • org.renjin.base.BasePackageCompiler
  • org.renjin.base.BasePackageTest
  • org.renjin.compiler.ByteCodeVisitor
  • org.renjin.compiler.ir.tac.expressions.EnvironmentVariable
  • org.renjin.compiler.ir.tac.expressions.Length
  • org.renjin.compiler.ir.tac.functions.AssignLeftTranslator
  • org.renjin.compiler.ir.tac.functions.ClosureTranslator
  • org.renjin.compiler.ir.tac.functions.ForTranslator
  • org.renjin.compiler.ir.tac.functions.InternalCallTranslator
    • Copyright © 2018 www.massapicom. All rights reserved.
    All source code are property of their respective owners. Java is a trademark of Sun Microsystems, Inc and owned by ORACLE Inc. Contact coftware#gmail.com.