DEADSOFTWARE

fix allocation arrays of untagged pointers
[cpc.git] / src / native / linux / 486 / System / Mod / Kernel.cp
index 339c640058e4331b420c560eda57e85186474d25..89d2ffd7c5792b93d26a46d193d0dfef99c82e82 100644 (file)
@@ -587,9 +587,9 @@ MODULE Kernel;
     | 9: eltyp := S.ADR(Char16Type)
     | 10: eltyp := S.ADR(Int64Type)
     | 11: eltyp := S.ADR(ProcType)
-    | 12: HALT(101)  (* COM interface pointers not supported *)
+    | 12: eltyp := S.ADR(UPtrType)
     ELSE
-      ASSERT(~ODD(eltyp), 102)  (* COM interface pointers not supported *)
+      ASSERT(~ODD(eltyp), 101)  (* COM interface pointers not supported *)
     END;
     t := S.VAL(Type, eltyp);
     headSize := 4 * nofdim + 12;