fixed interface to fef routines

diff --git a/mach/i386/ce/EM_table b/mach/i386/ce/EM_table
index 31bbca9..4060c7a 100644 (file)
--- a/mach/i386/ce/EM_table
+++ b/mach/i386/ce/EM_table
@@ -352,9 +352,13 @@ C_fif
   default      ==>     arg_error("C_fif", $1).
 
 C_fef
-  $1 == 4      ==>     C_lor((arith)1);
+  $1 == 4      ==>     "mov eax,esp";
+                       "sub eax,4";
+                       "push eax";
                        "call .fef4".
-  $1 == 8      ==>     C_lor((arith)1);
+  $1 == 8      ==>     "mov eax,esp"
+                       "sub eax,4";
+                       "push eax";
                        "call .fef8".
   default      ==>     arg_error("C_fef", $1).
 

diff --git a/mach/i86/ce/EM_table b/mach/i86/ce/EM_table
index 971344f..db6bc9f 100644 (file)
--- a/mach/i86/ce/EM_table
+++ b/mach/i86/ce/EM_table
@@ -423,9 +423,13 @@ C_fif
   default      ==>     arg_error("C_fif", $1).
 
 C_fef
-  $1 == 4      ==>     C_lor((arith)1);
+  $1 == 4      ==>     "mov ax,sp";
+                       "sub ax,2";
+                       "push ax";
                        "call .fef4".
-  $1 == 8      ==>     C_lor((arith)1);
+  $1 == 8      ==>     "mov ax,sp";
+                       "sub ax,2";
+                       "push ax";
                        "call .fef8".
   default      ==>     arg_error("C_fef", $1).