use new interface to fif and fef routines
This commit is contained in:
parent
fc9e01c8d8
commit
022b40d40c
2 changed files with 16 additions and 26 deletions
|
@ -343,20 +343,18 @@ C_dvf
|
||||||
default ==> arg_error("C_dvf", $1).
|
default ==> arg_error("C_dvf", $1).
|
||||||
|
|
||||||
C_fif
|
C_fif
|
||||||
$1 == 4 ==> "call .fif4".
|
$1 == 4 ==> C_lor((arith)1);
|
||||||
$1 == 8 ==> "call .fif8".
|
"call .fif4";
|
||||||
|
"pop ebx".
|
||||||
|
$1 == 8 ==> C_lor((arith)1);
|
||||||
|
"call .fif8";
|
||||||
|
"pop ebx".
|
||||||
default ==> arg_error("C_fif", $1).
|
default ==> arg_error("C_fif", $1).
|
||||||
|
|
||||||
C_fef
|
C_fef
|
||||||
$1 == 4 ==> "pop eax";
|
$1 == 4 ==> C_lor((arith)1);
|
||||||
"push eax";
|
|
||||||
"push eax";
|
|
||||||
"call .fef4".
|
"call .fef4".
|
||||||
$1 == 8 ==> "pop eax";
|
$1 == 8 ==> C_lor((arith)1);
|
||||||
"pop ebx";
|
|
||||||
"push eax";
|
|
||||||
"push ebx";
|
|
||||||
"push eax";
|
|
||||||
"call .fef8".
|
"call .fef8".
|
||||||
default ==> arg_error("C_fef", $1).
|
default ==> arg_error("C_fef", $1).
|
||||||
|
|
||||||
|
|
|
@ -414,26 +414,18 @@ C_dvf
|
||||||
default ==> arg_error("C_dvf", $1).
|
default ==> arg_error("C_dvf", $1).
|
||||||
|
|
||||||
C_fif
|
C_fif
|
||||||
$1 == 4 ==> "call .fif4".
|
$1 == 4 ==> C_lor((arith)1);
|
||||||
$1 == 8 ==> "call .fif8".
|
"call .fif4";
|
||||||
|
"pop bx".
|
||||||
|
$1 == 8 ==> C_lor((arith)1);
|
||||||
|
"call .fif8";
|
||||||
|
"pop bx".
|
||||||
default ==> arg_error("C_fif", $1).
|
default ==> arg_error("C_fif", $1).
|
||||||
|
|
||||||
C_fef
|
C_fef
|
||||||
$1 == 4 ==> "pop ax";
|
$1 == 4 ==> C_lor((arith)1);
|
||||||
"pop bx";
|
|
||||||
"push bx";
|
|
||||||
"push bx";
|
|
||||||
"push ax";
|
|
||||||
"call .fef4".
|
"call .fef4".
|
||||||
$1 == 8 ==> "pop ax";
|
$1 == 8 ==> C_lor((arith)1);
|
||||||
"pop bx";
|
|
||||||
"pop cx";
|
|
||||||
"pop dx";
|
|
||||||
"push dx";
|
|
||||||
"push dx";
|
|
||||||
"push cx";
|
|
||||||
"push bx";
|
|
||||||
"push ax";
|
|
||||||
"call .fef8".
|
"call .fef8".
|
||||||
default ==> arg_error("C_fef", $1).
|
default ==> arg_error("C_fef", $1).
|
||||||
|
|
||||||
|
|
Loading…
Add table
Reference in a new issue