diff --git a/src/cpfront/posix/486/System/Mod/Kernel.cp b/src/cpfront/posix/486/System/Mod/Kernel.cp
index 87ea635fc7524de0eca557d825ed0fc6dfee3f8c..a53ab07af3967b5b53f73e3912dea550dbb3baf7 100644 (file)
| 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;