|
@@ -91,7 +91,7 @@ let s_comp = function
|
|
let core_types =
|
|
let core_types =
|
|
let vp = { vfields = [||]; vindex = PMap.empty } in
|
|
let vp = { vfields = [||]; vindex = PMap.empty } in
|
|
let ep = { ename = ""; eid = 0; eglobal = None; efields = [||] } in
|
|
let ep = { ename = ""; eid = 0; eglobal = None; efields = [||] } in
|
|
- [HVoid;HUI8;HUI16;HI32;HF32;HF64;HBool;HBytes;HDyn;HFun ([],HVoid);HObj null_proto;HArray;HType;HRef HVoid;HVirtual vp;HDynObj;HAbstract ("",0);HEnum ep;HNull HVoid]
|
|
|
|
|
|
+ [HVoid;HUI8;HUI16;HI32;HI64;HF32;HF64;HBool;HBytes;HDyn;HFun ([],HVoid);HObj null_proto;HArray;HType;HRef HVoid;HVirtual vp;HDynObj;HAbstract ("",0);HEnum ep;HNull HVoid]
|
|
|
|
|
|
let tname str =
|
|
let tname str =
|
|
let n = String.concat "__" (ExtString.String.nsplit str ".") in
|
|
let n = String.concat "__" (ExtString.String.nsplit str ".") in
|