X-Git-Url: https://deadsoftware.ru/gitweb?a=blobdiff_plain;f=src%2Fnative%2Flinux%2F486%2FSystem%2FMod%2FKernel.cp;h=637c06de556b8b9b8a598f5a9f66b9d888e62519;hb=f96102d32aebccddc1cc7bcf295ba4c833e29a46;hp=339c640058e4331b420c560eda57e85186474d25;hpb=7f31515b8ffa0954d6b96af35a3925ab82800ae2;p=cpc.git

diff --git a/src/native/linux/486/System/Mod/Kernel.cp b/src/native/linux/486/System/Mod/Kernel.cp
index 339c640..637c06d 100644
--- a/src/native/linux/486/System/Mod/Kernel.cp
+++ b/src/native/linux/486/System/Mod/Kernel.cp
@@ -15,7 +15,7 @@ MODULE Kernel;
     littleEndian* = TRUE;
     timeResolution* = 1000; (* ticks per second *)
 
-    processor* = 1;  (* generic c *)
+    processor* = 10;  (* 486 *)
 
     objType* = "ocf"; (* file types *)
     symType* = "osf";
@@ -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;