some minor changes

This commit is contained in:
ceriel 1988-10-20 14:33:55 +00:00
parent e0fc646222
commit dc5a744d8d
4 changed files with 24 additions and 22 deletions

View file

@ -858,6 +858,6 @@ C_trp ==> "jsr (.trp)".
prolog ==> . prolog ==> .
jump ==> "jmp $1". jump ==> "bra $1".
locals ==> "link a6, #-$1". locals ==> "link a6, #-$1".

View file

@ -18,8 +18,8 @@ char *m;
process_operand( str, op) process_operand( str, op)
char *str; register char *str;
struct t_operand *op; register struct t_operand *op;
{ {
char *glob_lbl(); char *glob_lbl();
@ -171,7 +171,7 @@ char *reg;
} }
int is_reg( str) int is_reg( str)
char *str; register char *str;
{ {
switch ( *str) { switch ( *str) {
case 'a' : case 'a' :
@ -187,9 +187,9 @@ char *str;
char *glob_lbl( lbl) char *glob_lbl( lbl)
char *lbl; char *lbl;
{ {
char *gl, *malloc(); char *gl, *Malloc();
gl = malloc( strlen( lbl) + 3); gl = Malloc( strlen( lbl) + 3);
sprintf( gl, "\"%s\"", lbl); sprintf( gl, "\"%s\"", lbl);
return( gl); return( gl);
} }
@ -199,7 +199,7 @@ char *lbl;
int mode_reg( eaddr) int mode_reg( eaddr)
struct t_operand *eaddr; register struct t_operand *eaddr;
{ {
switch ( eaddr->type) { switch ( eaddr->type) {
case IS_A_REG : return( 0x08 | eaddr->reg); case IS_A_REG : return( 0x08 | eaddr->reg);
@ -240,7 +240,7 @@ struct t_operand *eaddr;
code_extension( eaddr) code_extension( eaddr)
struct t_operand *eaddr; register struct t_operand *eaddr;
{ {
switch ( eaddr->type) { switch ( eaddr->type) {
@ -341,9 +341,9 @@ struct t_operand *dst;
int two_log( nr) int two_log( nr)
int nr; register int nr;
{ {
int log; register int log;
for ( log = 0; nr >= 2; nr >>= 1) for ( log = 0; nr >= 2; nr >>= 1)
log++; log++;

View file

@ -1,8 +1,8 @@
#define BYTES_REVERSED #define BYTES_REVERSED
#define WORDS_REVERSED #define WORDS_REVERSED
#define ONE_BYTE char #define ONE_BYTE int
#define TWO_BYTES short #define TWO_BYTES int
#define FOUR_BYTES long #define FOUR_BYTES long
#define EM_WSIZE 4 #define EM_WSIZE 4
@ -13,10 +13,12 @@
#define NAME_FMT "_%s" #define NAME_FMT "_%s"
#define DNAM_FMT "_%s" #define DNAM_FMT "_%s"
#define DLB_FMT "_%ld" #define DLB_FMT "I_%ld"
#define ILB_FMT "I%x_%lx" #define ILB_FMT "I%x_%lx"
#define HOL_FMT "hol%d" #define HOL_FMT "hol%d"
#define GENLAB 'I'
#define ALIGN_FMT ".align\n" #define ALIGN_FMT ".align\n"
#define BYTE_FMT ".data1 %ld\n" #define BYTE_FMT ".data1 %ld\n"

View file

@ -18,8 +18,8 @@ char *m;
process_operand( str, op) process_operand( str, op)
char *str; register char *str;
struct t_operand *op; register struct t_operand *op;
{ {
char *glob_lbl(); char *glob_lbl();
@ -171,7 +171,7 @@ char *reg;
} }
int is_reg( str) int is_reg( str)
char *str; register char *str;
{ {
switch ( *str) { switch ( *str) {
case 'a' : case 'a' :
@ -187,9 +187,9 @@ char *str;
char *glob_lbl( lbl) char *glob_lbl( lbl)
char *lbl; char *lbl;
{ {
char *gl, *malloc(); char *gl, *Malloc();
gl = malloc( strlen( lbl) + 3); gl = Malloc( strlen( lbl) + 3);
sprintf( gl, "\"%s\"", lbl); sprintf( gl, "\"%s\"", lbl);
return( gl); return( gl);
} }
@ -199,7 +199,7 @@ char *lbl;
int mode_reg( eaddr) int mode_reg( eaddr)
struct t_operand *eaddr; register struct t_operand *eaddr;
{ {
switch ( eaddr->type) { switch ( eaddr->type) {
case IS_A_REG : return( 0x08 | eaddr->reg); case IS_A_REG : return( 0x08 | eaddr->reg);
@ -240,7 +240,7 @@ struct t_operand *eaddr;
code_extension( eaddr) code_extension( eaddr)
struct t_operand *eaddr; register struct t_operand *eaddr;
{ {
switch ( eaddr->type) { switch ( eaddr->type) {
@ -341,9 +341,9 @@ struct t_operand *dst;
int two_log( nr) int two_log( nr)
int nr; register int nr;
{ {
int log; register int log;
for ( log = 0; nr >= 2; nr >>= 1) for ( log = 0; nr >= 2; nr >>= 1)
log++; log++;