!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);
    O o = hotwire(src);
    print("Got: " + o);
    print("Name: " + call(o, "name"));
  }
}