From: ceriel Date: Mon, 31 Jul 1989 14:43:51 +0000 (+0000) Subject: fixed interface to fef routines X-Git-Tag: release-5-5~2311 X-Git-Url: https://git.ndcode.org/public/gitweb.cgi?a=commitdiff_plain;h=0ad83c648e020aa177050ab12ddcfc159630659b;p=ack.git fixed interface to fef routines --- diff --git a/mach/i386/ce/EM_table b/mach/i386/ce/EM_table index 31bbca922..4060c7acc 100644 --- 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 971344f62..db6bc9fd3 100644 --- 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).