Some corrections and simplifications

This commit is contained in:
ceriel 1990-11-16 16:31:40 +00:00
parent 449a757841
commit fb143bcdb5
8 changed files with 16 additions and 44 deletions

View file

@ -31,17 +31,10 @@ You must specify the appropriate word size, then REMOVE tables.c
#define dlb_fmt "I_%d" #define dlb_fmt "I_%d"
#define hol_fmt "hol%d" #define hol_fmt "hol%d"
#ifdef TBL68020
#define loc_off "(%d,a6)"
#define arg_off "(8+%d,a6)"
#else
#define loc_off "%d(a6)"
#define arg_off "8+%d(a6)"
#endif
#define hol_off "%ld+hol%d" #define hol_off "%ld+hol%d"
#if WORD_SIZE==2 #if WORD_SIZE==2
#define con_cst(x) fprintf(codefile,".data2\t%d\n",x) #define con_cst(x) fprintf(codefile,".data2\t%ld\n",x)
#else #else
#define con_cst(x) fprintf(codefile,".data4\t%ld\n",x) #define con_cst(x) fprintf(codefile,".data4\t%ld\n",x)
#endif #endif

View file

@ -34,8 +34,8 @@ Something very wrong here!
#define nicesize(x) ((x)==1||(x)==2||(x)==4||(x)==8) #define nicesize(x) ((x)==1||(x)==2||(x)==4||(x)==8)
#define low8(x) ((x) & 0377) #define low8(x) ((x) & 0377)
#define low16(x) ((x) & 0177777) #define low16(x) ((x) & 0177777)
#define in_1(x) ((x)>=0-128 && (x)<128) #define in_1(x) sfit(x,8)
#define in_2(x) ((x)>=0-32768 && (x)<32768) #define in_2(x) sfit(x,16)
EM_WSIZE = WORD_SIZE EM_WSIZE = WORD_SIZE
@ -6434,7 +6434,7 @@ with imm_cmp1 STACK
#if WORD_SIZE!=2 #if WORD_SIZE!=2
proc bxx2_in example loc loc cii loc bne proc bxx2_in example loc loc cii loc bne
with imm_cmp2 STACK with imm_cmp2 STACK
gen cmp_w {const, low16($4)}, %1 gen cmp_w {const, loww($4)}, %1
bxx* {llabel, $5} bxx* {llabel, $5}
#endif #endif

View file

@ -31,17 +31,10 @@ You must specify the appropriate word size, then REMOVE tables.c
#define dlb_fmt "I_%d" #define dlb_fmt "I_%d"
#define hol_fmt "hol%d" #define hol_fmt "hol%d"
#ifdef TBL68020
#define loc_off "(%d,a6)"
#define arg_off "(8+%d,a6)"
#else
#define loc_off "%d(a6)"
#define arg_off "8+%d(a6)"
#endif
#define hol_off "%ld+hol%d" #define hol_off "%ld+hol%d"
#if WORD_SIZE==2 #if WORD_SIZE==2
#define con_cst(x) fprintf(codefile,".data2\t%d\n",x) #define con_cst(x) fprintf(codefile,".data2\t%ld\n",x)
#else #else
#define con_cst(x) fprintf(codefile,".data4\t%ld\n",x) #define con_cst(x) fprintf(codefile,".data4\t%ld\n",x)
#endif #endif

View file

@ -34,8 +34,8 @@ Something very wrong here!
#define nicesize(x) ((x)==1||(x)==2||(x)==4||(x)==8) #define nicesize(x) ((x)==1||(x)==2||(x)==4||(x)==8)
#define low8(x) ((x) & 0377) #define low8(x) ((x) & 0377)
#define low16(x) ((x) & 0177777) #define low16(x) ((x) & 0177777)
#define in_1(x) ((x)>=0-128 && (x)<128) #define in_1(x) sfit(x,8)
#define in_2(x) ((x)>=0-32768 && (x)<32768) #define in_2(x) sfit(x,16)
EM_WSIZE = WORD_SIZE EM_WSIZE = WORD_SIZE
@ -6434,7 +6434,7 @@ with imm_cmp1 STACK
#if WORD_SIZE!=2 #if WORD_SIZE!=2
proc bxx2_in example loc loc cii loc bne proc bxx2_in example loc loc cii loc bne
with imm_cmp2 STACK with imm_cmp2 STACK
gen cmp_w {const, low16($4)}, %1 gen cmp_w {const, loww($4)}, %1
bxx* {llabel, $5} bxx* {llabel, $5}
#endif #endif

View file

@ -31,17 +31,10 @@ You must specify the appropriate word size, then REMOVE tables.c
#define dlb_fmt "I_%d" #define dlb_fmt "I_%d"
#define hol_fmt "hol%d" #define hol_fmt "hol%d"
#ifdef TBL68020
#define loc_off "(%d,a6)"
#define arg_off "(8+%d,a6)"
#else
#define loc_off "%d(a6)"
#define arg_off "8+%d(a6)"
#endif
#define hol_off "%ld+hol%d" #define hol_off "%ld+hol%d"
#if WORD_SIZE==2 #if WORD_SIZE==2
#define con_cst(x) fprintf(codefile,".data2\t%d\n",x) #define con_cst(x) fprintf(codefile,".data2\t%ld\n",x)
#else #else
#define con_cst(x) fprintf(codefile,".data4\t%ld\n",x) #define con_cst(x) fprintf(codefile,".data4\t%ld\n",x)
#endif #endif

View file

@ -34,8 +34,8 @@ Something very wrong here!
#define nicesize(x) ((x)==1||(x)==2||(x)==4||(x)==8) #define nicesize(x) ((x)==1||(x)==2||(x)==4||(x)==8)
#define low8(x) ((x) & 0377) #define low8(x) ((x) & 0377)
#define low16(x) ((x) & 0177777) #define low16(x) ((x) & 0177777)
#define in_1(x) ((x)>=0-128 && (x)<128) #define in_1(x) sfit(x,8)
#define in_2(x) ((x)>=0-32768 && (x)<32768) #define in_2(x) sfit(x,16)
EM_WSIZE = WORD_SIZE EM_WSIZE = WORD_SIZE
@ -6434,7 +6434,7 @@ with imm_cmp1 STACK
#if WORD_SIZE!=2 #if WORD_SIZE!=2
proc bxx2_in example loc loc cii loc bne proc bxx2_in example loc loc cii loc bne
with imm_cmp2 STACK with imm_cmp2 STACK
gen cmp_w {const, low16($4)}, %1 gen cmp_w {const, loww($4)}, %1
bxx* {llabel, $5} bxx* {llabel, $5}
#endif #endif

View file

@ -31,17 +31,10 @@ You must specify the appropriate word size, then REMOVE tables.c
#define dlb_fmt "I_%d" #define dlb_fmt "I_%d"
#define hol_fmt "hol%d" #define hol_fmt "hol%d"
#ifdef TBL68020
#define loc_off "(%d,a6)"
#define arg_off "(8+%d,a6)"
#else
#define loc_off "%d(a6)"
#define arg_off "8+%d(a6)"
#endif
#define hol_off "%ld+hol%d" #define hol_off "%ld+hol%d"
#if WORD_SIZE==2 #if WORD_SIZE==2
#define con_cst(x) fprintf(codefile,".data2\t%d\n",x) #define con_cst(x) fprintf(codefile,".data2\t%ld\n",x)
#else #else
#define con_cst(x) fprintf(codefile,".data4\t%ld\n",x) #define con_cst(x) fprintf(codefile,".data4\t%ld\n",x)
#endif #endif

View file

@ -34,8 +34,8 @@ Something very wrong here!
#define nicesize(x) ((x)==1||(x)==2||(x)==4||(x)==8) #define nicesize(x) ((x)==1||(x)==2||(x)==4||(x)==8)
#define low8(x) ((x) & 0377) #define low8(x) ((x) & 0377)
#define low16(x) ((x) & 0177777) #define low16(x) ((x) & 0177777)
#define in_1(x) ((x)>=0-128 && (x)<128) #define in_1(x) sfit(x,8)
#define in_2(x) ((x)>=0-32768 && (x)<32768) #define in_2(x) sfit(x,16)
EM_WSIZE = WORD_SIZE EM_WSIZE = WORD_SIZE
@ -6434,7 +6434,7 @@ with imm_cmp1 STACK
#if WORD_SIZE!=2 #if WORD_SIZE!=2
proc bxx2_in example loc loc cii loc bne proc bxx2_in example loc loc cii loc bne
with imm_cmp2 STACK with imm_cmp2 STACK
gen cmp_w {const, low16($4)}, %1 gen cmp_w {const, loww($4)}, %1
bxx* {llabel, $5} bxx* {llabel, $5}
#endif #endif