X-Git-Url: https://git.gag.com/?a=blobdiff_plain;f=src%2Fz80%2Fmain.c;h=057d01d5ab14190fccb3ada01a162c6657031175;hb=97fb99719a1c1caaac6d85c17e7665a92fb98f3b;hp=55fb58d01a202823fac7a60b35edcb06ab9a2a14;hpb=5d609f8d1aef366db39770b8e9c26757b7e7622e;p=fw%2Fsdcc

diff --git a/src/z80/main.c b/src/z80/main.c
index 55fb58d0..057d01d5 100644
--- a/src/z80/main.c
+++ b/src/z80/main.c
@@ -81,6 +81,7 @@ static char *_keywords[] =
   "banked",
   "at",       //.p.t.20030714 adding support for 'sfr at ADDR' construct
   "_naked",   //.p.t.20030714 adding support for '_naked' functions
+  "critical",
   NULL
 };
 
@@ -626,10 +627,21 @@ PORT z80_port =
   {
     z80_emitDebuggerSymbol
   },
+  {
+    255,        /* maxCount */
+    3,          /* sizeofElement */
+    /* The rest of these costs are bogus. They approximate */
+    /* the behavior of src/SDCCicode.c 1.207 and earlier.  */
+    {4,4,4},    /* sizeofMatchJump[] */
+    {0,0,0},    /* sizeofRangeCompare[] */
+    0,          /* sizeofSubtract */
+    3,          /* sizeofDispatch */
+  },
   "_",
   _z80_init,
   _parseOptions,
   _z80_options,
+  NULL,
   _finaliseOptions,
   _setDefaultOptions,
   z80_assignRegisters,
@@ -730,10 +742,21 @@ PORT gbz80_port =
   {
     z80_emitDebuggerSymbol
   },
+  {
+    255,        /* maxCount */
+    3,          /* sizeofElement */
+    /* The rest of these costs are bogus. They approximate */
+    /* the behavior of src/SDCCicode.c 1.207 and earlier.  */
+    {4,4,4},    /* sizeofMatchJump[] */
+    {0,0,0},    /* sizeofRangeCompare[] */
+    0,          /* sizeofSubtract */
+    3,          /* sizeofDispatch */
+  },
   "_",
   _gbz80_init,
   _parseOptions,
   _gbz80_options,
+  NULL,
   _finaliseOptions,
   _setDefaultOptions,
   z80_assignRegisters,