From 92bccdd4fa3b1ac9bb4c452790f5a547c6e7e54b Mon Sep 17 00:00:00 2001 From: ceriel Date: Thu, 10 Aug 1989 14:17:50 +0000 Subject: [PATCH] inline FEF code for M68881 was wrong; replaced bu subroutine call --- mach/m68020/ncg/table | 24 +----------------------- mach/m68k2/ncg/table | 24 +----------------------- mach/m68k4/ncg/table | 24 +----------------------- mach/moon3/ncg/table | 24 +----------------------- 4 files changed, 4 insertions(+), 92 deletions(-) diff --git a/mach/m68020/ncg/table b/mach/m68020/ncg/table index 787a8c8cf..6f0b79f47 100644 --- a/mach/m68020/ncg/table +++ b/mach/m68020/ncg/table @@ -3156,28 +3156,6 @@ pat fif $1==8 fsub %1,%2 fmove_d %2,{pre_dec4,sp} fmove_d %1,{pre_dec4,sp} -pat fef $1==4 - with FS_REG STACK - uses D_REG, FS_REG - gen fgetexp %1,%b - fmove_l %b,%a - add_l {const,1},%a - fgetman %1 - fmove_l {const,2},%b - fdiv %b,%1 - fmove_s %1,{pre_dec4,sp} - yields %a -pat fef $1==8 - with FD_REG STACK - uses D_REG, FD_REG - gen fgetexp %1,%b - fmove_l %b,%a - add_l {const,1},%a - fgetman %1 - fmove_l {const,2},%b - fdiv %b,%1 - fmove_d %1,{pre_dec4,sp} - yields %a #else pat adf $1==4 leaving cal ".adf4" asp 4 pat adf $1==8 leaving cal ".adf8" asp 8 @@ -3191,9 +3169,9 @@ pat ngf $1==4 leaving cal ".ngf4" pat ngf $1==8 leaving cal ".ngf8" pat fif $1==4 leaving lor 1 cal ".fif4" asp 4 pat fif $1==8 leaving lor 1 cal ".fif8" asp 4 +#endif pat fef $1==4 leaving lor 1 adp 0-4 cal ".fef4" pat fef $1==8 leaving lor 1 adp 0-4 cal ".fef8" -#endif /************************************************ * Group 6: pointer arithmetic * diff --git a/mach/m68k2/ncg/table b/mach/m68k2/ncg/table index 787a8c8cf..6f0b79f47 100644 --- a/mach/m68k2/ncg/table +++ b/mach/m68k2/ncg/table @@ -3156,28 +3156,6 @@ pat fif $1==8 fsub %1,%2 fmove_d %2,{pre_dec4,sp} fmove_d %1,{pre_dec4,sp} -pat fef $1==4 - with FS_REG STACK - uses D_REG, FS_REG - gen fgetexp %1,%b - fmove_l %b,%a - add_l {const,1},%a - fgetman %1 - fmove_l {const,2},%b - fdiv %b,%1 - fmove_s %1,{pre_dec4,sp} - yields %a -pat fef $1==8 - with FD_REG STACK - uses D_REG, FD_REG - gen fgetexp %1,%b - fmove_l %b,%a - add_l {const,1},%a - fgetman %1 - fmove_l {const,2},%b - fdiv %b,%1 - fmove_d %1,{pre_dec4,sp} - yields %a #else pat adf $1==4 leaving cal ".adf4" asp 4 pat adf $1==8 leaving cal ".adf8" asp 8 @@ -3191,9 +3169,9 @@ pat ngf $1==4 leaving cal ".ngf4" pat ngf $1==8 leaving cal ".ngf8" pat fif $1==4 leaving lor 1 cal ".fif4" asp 4 pat fif $1==8 leaving lor 1 cal ".fif8" asp 4 +#endif pat fef $1==4 leaving lor 1 adp 0-4 cal ".fef4" pat fef $1==8 leaving lor 1 adp 0-4 cal ".fef8" -#endif /************************************************ * Group 6: pointer arithmetic * diff --git a/mach/m68k4/ncg/table b/mach/m68k4/ncg/table index 787a8c8cf..6f0b79f47 100644 --- a/mach/m68k4/ncg/table +++ b/mach/m68k4/ncg/table @@ -3156,28 +3156,6 @@ pat fif $1==8 fsub %1,%2 fmove_d %2,{pre_dec4,sp} fmove_d %1,{pre_dec4,sp} -pat fef $1==4 - with FS_REG STACK - uses D_REG, FS_REG - gen fgetexp %1,%b - fmove_l %b,%a - add_l {const,1},%a - fgetman %1 - fmove_l {const,2},%b - fdiv %b,%1 - fmove_s %1,{pre_dec4,sp} - yields %a -pat fef $1==8 - with FD_REG STACK - uses D_REG, FD_REG - gen fgetexp %1,%b - fmove_l %b,%a - add_l {const,1},%a - fgetman %1 - fmove_l {const,2},%b - fdiv %b,%1 - fmove_d %1,{pre_dec4,sp} - yields %a #else pat adf $1==4 leaving cal ".adf4" asp 4 pat adf $1==8 leaving cal ".adf8" asp 8 @@ -3191,9 +3169,9 @@ pat ngf $1==4 leaving cal ".ngf4" pat ngf $1==8 leaving cal ".ngf8" pat fif $1==4 leaving lor 1 cal ".fif4" asp 4 pat fif $1==8 leaving lor 1 cal ".fif8" asp 4 +#endif pat fef $1==4 leaving lor 1 adp 0-4 cal ".fef4" pat fef $1==8 leaving lor 1 adp 0-4 cal ".fef8" -#endif /************************************************ * Group 6: pointer arithmetic * diff --git a/mach/moon3/ncg/table b/mach/moon3/ncg/table index 787a8c8cf..6f0b79f47 100644 --- a/mach/moon3/ncg/table +++ b/mach/moon3/ncg/table @@ -3156,28 +3156,6 @@ pat fif $1==8 fsub %1,%2 fmove_d %2,{pre_dec4,sp} fmove_d %1,{pre_dec4,sp} -pat fef $1==4 - with FS_REG STACK - uses D_REG, FS_REG - gen fgetexp %1,%b - fmove_l %b,%a - add_l {const,1},%a - fgetman %1 - fmove_l {const,2},%b - fdiv %b,%1 - fmove_s %1,{pre_dec4,sp} - yields %a -pat fef $1==8 - with FD_REG STACK - uses D_REG, FD_REG - gen fgetexp %1,%b - fmove_l %b,%a - add_l {const,1},%a - fgetman %1 - fmove_l {const,2},%b - fdiv %b,%1 - fmove_d %1,{pre_dec4,sp} - yields %a #else pat adf $1==4 leaving cal ".adf4" asp 4 pat adf $1==8 leaving cal ".adf8" asp 8 @@ -3191,9 +3169,9 @@ pat ngf $1==4 leaving cal ".ngf4" pat ngf $1==8 leaving cal ".ngf8" pat fif $1==4 leaving lor 1 cal ".fif4" asp 4 pat fif $1==8 leaving lor 1 cal ".fif8" asp 4 +#endif pat fef $1==4 leaving lor 1 adp 0-4 cal ".fef4" pat fef $1==8 leaving lor 1 adp 0-4 cal ".fef8" -#endif /************************************************ * Group 6: pointer arithmetic *