2
0
Эх сурвалжийг харах

* fixed getting the address of a global variable

git-svn-id: branches/wasm@47168 -
nickysn 4 жил өмнө
parent
commit
8211bcbd4c

+ 3 - 3
compiler/wasm32/hlcgcpu.pas

@@ -1139,12 +1139,12 @@ implementation
       { only allowed for types that are not implicit pointers in Pascal (in
         that case, ref contains a pointer to the actual data and we simply
         return that pointer) }
-      if not wasmAlwayInMem(fromsize) then
-        internalerror(2010120534);
+      //if not wasmAlwayInMem(fromsize) then
+      //  internalerror(2010120534);
 
       if assigned(ref.symbol) then begin
         // pushing address on stack
-        list.Concat(taicpu.op_ref(a_get_global, ref));
+        list.Concat(taicpu.op_ref(a_i32_const, ref));
         incstack(list, 1);
         // reading back to the register
         a_load_stack_reg(list, tosize, r);