internal void CreateR6Object(string className, string objName)
        {
            Execute(objName + " = " + className + "$new()");
            REnvironment env = GetEnvironmentReturn();

            engine.SetSymbol(objName, env);
        }
        private IntPtr CallDeviceFunction(IntPtr call, IntPtr operation, IntPtr args, IntPtr environment, Func <Language, SymbolicExpression, Pairlist, REnvironment, SymbolicExpression> func)
        {
            var c       = new Language(Engine, call);
            var op      = new SymbolicExpression(Engine, operation);
            var arglist = new Pairlist(Engine, args);
            var env     = new REnvironment(Engine, environment);
            SymbolicExpression result = func(c, op, arglist, env);

            return(result.DangerousGetHandle());
        }
 /// <summary>
 /// Return the NULL SEXP; no other effect
 /// </summary>
 /// <param name="call"></param>
 /// <param name="operation"></param>
 /// <param name="args"></param>
 /// <param name="environment"></param>
 /// <returns></returns>
 public SymbolicExpression AddHistory(Language call, SymbolicExpression operation, Pairlist args, REnvironment environment)
 {
     return environment.Engine.NilValue;
 }
Esempio n. 4
0
 /// <summary>
 /// Return the NULL SEXP; no other effect
 /// </summary>
 /// <param name="call"></param>
 /// <param name="operation"></param>
 /// <param name="args"></param>
 /// <param name="environment"></param>
 /// <returns></returns>
 public SymbolicExpression AddHistory(Language call, SymbolicExpression operation, Pairlist args, REnvironment environment)
 {
     return(environment.Engine.NilValue);
 }
        internal void LoadObject(string objName)
        {
            REnvironment env = GetEnvironmentReturn();

            engine.SetSymbol(objName, env);
        }
        internal REnvironment GetEnvironmentReturn()
        {
            REnvironment env = ret.AsEnvironment();

            return(env);
        }
Esempio n. 7
0
 public SymbolicExpression SaveHistory(Language call, SymbolicExpression operation, Pairlist args, REnvironment environment)
 {
     throw new NotImplementedException();
 }
Esempio n. 8
0
 public SymbolicExpression AddHistory(Language call, SymbolicExpression operation, Pairlist args, REnvironment environment)
 {
     return(null);
 }