static O quickExport(O o, O dest) {

  ret quickExport_impl(o, dest, new IdentityHashMap, new HashMap);

}

static O quickExport(O o, O dest, int expectedNumberOfObjects) {

  ret quickExport_impl(o, dest, new IdentityHashMap(expectedNumberOfObjects), new HashMap);

}

/*sclass quickExport_info {

  Class destClass;

  Field[] fields;

}*/

static O quickExport_impl(O o, O dest, IdentityHashMap seen, HashMap<Class> classMap) ctex {

  if (o == null || o instanceof String || o instanceof Number) return o;

  O oo = seen.get(o);

  if (oo != null) ret oo;

  if (o instanceof O[]) {

    O[] l = (O[]) o;

    O[] destO = newObjectArrayOfSameType(l, l.length);

    seen.put(o, destO); 

    for (int i = 0; i < l.length; i++)

      destO[i] = quickExport_impl(l[i], dest, seen, classMap);

    ret destO;

  }

  if (o instanceof Cl) {

    Cl l = cast o;

    int n = l.size();

    List destO = new ArrayList(n);

    seen.put(o, destO);

    Iterator it = l.iterator();

    for i to n:

      destO.add(quickExport_impl(it.next(), dest, seen, classMap));

    ret destO;

  }

  if (o instanceof Map) {

    Map m = cast o;

    Map destO = new HashMap();

    seen.put(o, destO);

    for (Object e : ((Map) o).entrySet())

      destO.put(

        quickExport_impl(((Map.Entry) e).getKey(), dest, seen, classMap),

        quickExport_impl(((Map.Entry) e).getValue(), dest, seen, classMap));

    return destO;

  }

  Class c = o.getClass();

  S className = c.getName();

  className = loadableUtilsClassNameToMain(className);

  if (className.startsWith("main$")) {

    Class destClass = classMap.get(c);

    if (destClass == null) {

      if (!classMap.containsKey(c)) {

        if (!isAnonymousClassName(className))

          destClass = getClass_vmName_withLoadableUtils(dest, className);

        classMap.put(c, destClass);

      }

      if (destClass == null) ret o; // Class not found in target realm, keep object as is

    }

    if (c == destClass) ret o; // no export necessary

    // actually make a new object, copy fields

    O destO = nuObjectWithoutArguments(destClass);

    seen.put(o, destO);

    while (c != O.class) {

      // TODO: cache fields and destination fields

      Field[] fields = c.getDeclaredFields();

      for (Field field : fields) {

        if ((field.getModifiers() & Modifier.STATIC) != 0)

          continue;

        field.setAccessible(true);

        Object value = field.get(o);

        setOpt(destO, field.getName(), quickExport_impl(value, dest, seen, classMap));

      }

      c = c.getSuperclass();

    }

    return destO;

  }

  // assume it's a shared library object

  ret o;

}