replaced all ::= by ==>

This commit is contained in:
ceriel 1988-09-07 14:47:46 +00:00
parent a01ea4d930
commit 3a183b7b44
2 changed files with 25 additions and 25 deletions

View file

@ -187,9 +187,9 @@ C_sri
/******************************************************************************/ /******************************************************************************/
C_adu ::= C_adi( w). C_adu ==> C_adi( w).
C_sbu ::= C_sbi( w). C_sbu ==> C_sbi( w).
C_mlu C_mlu
$1 == 4 ==> "move.l (sp)+, d0"; $1 == 4 ==> "move.l (sp)+, d0";
@ -211,7 +211,7 @@ C_rmu
"move.l d2, -(sp)". "move.l d2, -(sp)".
default ==> arg_error( "rmu", $1). default ==> arg_error( "rmu", $1).
C_slu ::= C_sli( w). C_slu ==> C_sli( w).
C_sru C_sru
$1 == 4 ==> "move.l (sp)+, d0"; $1 == 4 ==> "move.l (sp)+, d0";
@ -228,47 +228,47 @@ C_sru
/******************************************************************************/ /******************************************************************************/
C_adf C_adf
$1 == 4 ::= C_cal( "adf4"); $1 == 4 ==> C_cal( "adf4");
C_asp( (arith) 4). C_asp( (arith) 4).
$1 == 8 ::= C_cal( "adf8"); $1 == 8 ==> C_cal( "adf8");
C_asp( (arith) 8). C_asp( (arith) 8).
default ==> arg_error( "adf", $1). default ==> arg_error( "adf", $1).
C_sbf C_sbf
$1 == 4 ::= C_cal( "sbf4"); $1 == 4 ==> C_cal( "sbf4");
C_asp( (arith) 4). C_asp( (arith) 4).
$1 == 8 ::= C_cal( "sbf8"); $1 == 8 ==> C_cal( "sbf8");
C_asp( (arith) 8). C_asp( (arith) 8).
default ==> arg_error( "sbf", $1). default ==> arg_error( "sbf", $1).
C_mlf C_mlf
$1 == 4 ::= C_cal( "mlf4"); $1 == 4 ==> C_cal( "mlf4");
C_asp( (arith) 4). C_asp( (arith) 4).
$1 == 8 ::= C_cal( "mlf8"); $1 == 8 ==> C_cal( "mlf8");
C_asp( (arith) 8). C_asp( (arith) 8).
default ==> arg_error( "mlf", $1). default ==> arg_error( "mlf", $1).
C_dvf C_dvf
$1 == 4 ::= C_cal( "dvf4"); $1 == 4 ==> C_cal( "dvf4");
C_asp( (arith) 4). C_asp( (arith) 4).
$1 == 8 ::= C_cal( "dvf8"); $1 == 8 ==> C_cal( "dvf8");
C_asp( (arith) 8). C_asp( (arith) 8).
default ==> arg_error( "dvf", $1). default ==> arg_error( "dvf", $1).
C_ngf C_ngf
$1 == 4 ::= C_cal( "ngf4"). $1 == 4 ==> C_cal( "ngf4").
$1 == 8 ::= C_cal( "ngf8"). $1 == 8 ==> C_cal( "ngf8").
default ==> arg_error( "ngf", $1). default ==> arg_error( "ngf", $1).
C_fif C_fif
$1 == 4 ::= C_cal( "fif4"). $1 == 4 ==> C_cal( "fif4").
$1 == 8 ::= C_cal( "fif8"). $1 == 8 ==> C_cal( "fif8").
default ==> arg_error( "fif", $1). default ==> arg_error( "fif", $1).
C_fef C_fef
$1 == 4 ::= C_dup( (arith) 4); $1 == 4 ==> C_dup( (arith) 4);
C_cal( "fef4"). C_cal( "fef4").
$1 == 8 ::= "move.l (sp)+, d0"; $1 == 8 ==> "move.l (sp)+, d0";
"move.l (sp)+, d1"; "move.l (sp)+, d1";
"move.l d0, -(sp)"; "move.l d0, -(sp)";
"move.l d1, -(sp)"; "move.l d1, -(sp)";
@ -318,7 +318,7 @@ C_zrl ==> "clr.l ($1, a6)".
C_zre.. ==> "clr.l ($1+$2)". C_zre.. ==> "clr.l ($1+$2)".
C_zrf ::= C_zer( $1). C_zrf ==> C_zer( $1).
C_zer C_zer
$1 == 4 ==> "clr.l -(sp)". $1 == 4 ==> "clr.l -(sp)".
@ -357,9 +357,9 @@ C_cii ==> " move.l (sp), d0";
C_cuu ==> "jsr (.cuu) ". C_cuu ==> "jsr (.cuu) ".
C_ciu ::= C_cuu(). C_ciu ==> C_cuu().
C_cui ::= C_cuu(). C_cui ==> C_cuu().
/******************************************************************************/ /******************************************************************************/
/* */ /* */
@ -530,7 +530,7 @@ C_cms_narg ==> "move.l (sp)+, d0";
"jsr (.cms)"; "jsr (.cms)";
"move.l d0, -(sp)". "move.l d0, -(sp)".
C_cmp ::= C_cmu( (arith)4). C_cmp ==> C_cmu( (arith)4).
C_tlt ==> "move.l (sp)+, d0"; C_tlt ==> "move.l (sp)+, d0";
"move.l #1, -(sp)"; "move.l #1, -(sp)";
@ -704,7 +704,7 @@ C_csb
$1 == 4 ==> "jmp (.csb)". $1 == 4 ==> "jmp (.csb)".
default ==> arg_error( "csb", $1). default ==> arg_error( "csb", $1).
C_dch ::= C_loi( (arith)4). C_dch ==> C_loi( (arith)4).
C_dup C_dup
$1 == 4 ==> "move.l (sp), -(sp)". $1 == 4 ==> "move.l (sp), -(sp)".
@ -749,7 +749,7 @@ C_lor
$1 == 2 ==> "move.l (.reghp), -(sp)". $1 == 2 ==> "move.l (.reghp), -(sp)".
default ==> arg_error( "lor", $1). default ==> arg_error( "lor", $1).
C_lpb ::= C_adp( (arith)8). C_lpb ==> C_adp( (arith)8).
C_mon ==> "jsr (.mon)". C_mon ==> "jsr (.mon)".
@ -765,7 +765,7 @@ C_rck
"1: move.l d0, -(sp)". "1: move.l d0, -(sp)".
default ==> arg_error( "rck", $1). default ==> arg_error( "rck", $1).
C_rtt ::= C_ret( (arith)0). C_rtt ==> C_ret( (arith)0).
C_sig ==> "move.l (.trppc), a0"; C_sig ==> "move.l (.trppc), a0";
"move.l (sp)+, (.trppc)"; "move.l (sp)+, (.trppc)";

View file

@ -14,7 +14,7 @@
#define NAME_FMT "_%s" #define NAME_FMT "_%s"
#define DNAM_FMT "_%s" #define DNAM_FMT "_%s"
#define DLB_FMT "_%ld" #define DLB_FMT "_%ld"
#define ILB_FMT "I%03d%ld" #define ILB_FMT "I%x_%lx"
#define HOL_FMT "hol%d" #define HOL_FMT "hol%d"
#define ALIGN_FMT ".align\n" #define ALIGN_FMT ".align\n"