!7

cprint {
  start-thread {
    ClassLoader cl = getClassLoader(module());
    print("My class loader: " + cl);
    print("Class loader type: " + className(cl));
    Map<S, ClassLoader> parents = cast getOpt parentMap(cl);
    print("Parents: " + parents);
    
    hotwireTest();
  }
  
  void hotwireTest {
    S name = aGlobalID();
    print("Class name: " + name);
    S src = "class " + name + " { sS name() { ret " + quote("I am " + name) + "; } }";
    print(src);
    
    // taken from veryQuickJava3
    new LS libs;
    S transpiled = transpileRaw(src); // transpiled, with lib references
    
    // taken from veryQuickJava_finish
    src = findTranslators2(src, libs);
    S dehlibs = join(" ", libs);
    File bytecode = javaCompile_overInternalBot(src, dehlibs);
    print(+bytecode);
    
    //print("Name: " + call(o, "name"));
  }
}