fixed interface to fef routines

This commit is contained in:
ceriel 1989-07-31 14:43:51 +00:00
parent 1280176fb0
commit 0ad83c648e
2 changed files with 12 additions and 4 deletions

View file

@ -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).

View file

@ -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).