org.simantics.r.scl/src/org/rosuda/REngine/REXPJavaReference.java

   1 package org.rosuda.REngine;
   2
   3 /** REXPJavaReference is a reference to a Java object that has been resolved from is R wrapper. Note that not all engines support references. */
   4 public class REXPJavaReference extends REXP {
   5         /** the referenced Java object */
   6         Object object;
   7
   8         /** creates a new Java reference R object
   9          *  @param o Java object referenced by the REXP */
  10         public REXPJavaReference(Object o) { super(); this.object = o; }
  11
  12         /** creates a new Java reference R object
  13          *  @param o Java object referenced by the REXP
  14          *  @param attr attributes (of the R wrapper) */
  15         public REXPJavaReference(Object o, REXPList attr) { super(attr); this.object = o; }
  16
  17         /** returns the Java object referenced by this REXP
  18          *  @return Java object */
  19         public Object getObject() { return object; }
  20
  21         public Object asNativeJavaObject() { return object; }
  22
  23         public String toString() {
  24                 return super.toString() + "[" + object + "]";
  25         }
  26 }