From: DeaDDooMER <deaddoomer@deadsoftware.ru>
Date: Sun, 8 Mar 2020 11:54:51 +0000 (+0300)
Subject: Kernel: fix kernels compilation and processor types
X-Git-Url: http://deadsoftware.ru/gitweb?p=cpc.git;a=commitdiff_plain;h=f96102d32aebccddc1cc7bcf295ba4c833e29a46

Kernel: fix kernels compilation and processor types
---

diff --git a/src/cpfront/posix/486/System/Mod/Kernel.cp b/src/cpfront/posix/486/System/Mod/Kernel.cp
index 2bf92b6..a53ab07 100644
--- a/src/cpfront/posix/486/System/Mod/Kernel.cp
+++ b/src/cpfront/posix/486/System/Mod/Kernel.cp
@@ -589,7 +589,7 @@ MODULE Kernel;
     | 9: eltyp := S.ADR(Char16Type)
     | 10: eltyp := S.ADR(Int64Type)
     | 11: eltyp := S.ADR(ProcType)
-    | 12: eltype := S.ADR(UPtrType)
+    | 12: eltyp := S.ADR(UPtrType)
     ELSE
       ASSERT(~ODD(eltyp), 101)  (* COM interface pointers not supported *)
     END;
diff --git a/src/cpfront/posix/powerpc/System/Mod/Kernel.cp b/src/cpfront/posix/powerpc/System/Mod/Kernel.cp
index f691ecc..b76117b 100644
--- a/src/cpfront/posix/powerpc/System/Mod/Kernel.cp
+++ b/src/cpfront/posix/powerpc/System/Mod/Kernel.cp
@@ -608,7 +608,7 @@ MODULE Kernel;
     | 9: eltyp := S.ADR(Char16Type)
     | 10: eltyp := S.ADR(Int64Type)
     | 11: eltyp := S.ADR(ProcType)
-    | 12: eltype := S.ADR(UPtrType)
+    | 12: eltyp := S.ADR(UPtrType)
     ELSE
       ASSERT(~ODD(eltyp), 101)  (* COM interface pointers not supported *)
     END;
diff --git a/src/native/linux/486/System/Mod/Kernel.cp b/src/native/linux/486/System/Mod/Kernel.cp
index 89d2ffd..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";
diff --git a/src/native/posix/486/System/Mod/Kernel.cp b/src/native/posix/486/System/Mod/Kernel.cp
index 2ffbe43..7853c51 100644
--- a/src/native/posix/486/System/Mod/Kernel.cp
+++ b/src/native/posix/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,7 +587,7 @@ MODULE Kernel;
     | 9: eltyp := S.ADR(Char16Type)
     | 10: eltyp := S.ADR(Int64Type)
     | 11: eltyp := S.ADR(ProcType)
-    | 12: eltype := S.ADR(UPtrType)
+    | 12: eltyp := S.ADR(UPtrType)
     ELSE
       ASSERT(~ODD(eltyp), 101)  (* COM interface pointers not supported *)
     END;