Quick Search:

Mode

Context

Displaying 3 lines of context. None | Less | More | Full

Other Diffs

Ignore

Blank Lines Whitespace: Expand:

Diff

1.2
 
1.3
 
MAIN:ragge:20140603201950
 
table.c
_>3232 # define ANYSIGNED TINT|TLONG|TSHORT|TCHAR
 3333 # define ANYUSIGNED TUNSIGNED|TULONG|TUSHORT|TUCHAR
 3434 # define ANYFIXED ANYSIGNED|ANYUSIGNED
<> 35+# define ANYREG (INAREG|INBREG|INCREG)
3536 # define TUWORD TUNSIGNED|TULONG
 3637 # define TSWORD TINT|TLONG
 3738 # define TWORD TUWORD|TSWORD
     
 !
4041 /* First entry must be an empty entry */
 4142 { -1, FOREFF, SANY, TANY, SANY, TANY, 0, 0, "", },
 4243 
<>43 -{ ASSIGN,       FOREFF|INAREG,
 44 -        SAREG,  TWORD|TPOINT,
 45 -        SAREG,  TWORD|TPOINT,
  44+/*
  45+ * All ASSIGN entries.
  46+ */
  47+/* reg->reg */
  48+{ ASSIGN,       FOREFF|INAREG|INBREG,
  49+        SAREG|SBREG,    TWORD|TPOINT,
  50+        SAREG|SBREG,    TWORD|TPOINT,
4651                 0,      RDEST,
<>47 -                "       mov AR,ALZA\n", },
 48 -
 49 -{ ASSIGN,       FOREFF|INAREG,
 50 -        SNAME,  TWORD|TPOINT,
 51 -        SAREG,  TWORD|TPOINT,
  52+                "       mov AR,AL\n", },
  53+/* reg->mem */
  54+{ ASSIGN,       FOREFF|INAREG|INBREG,
  55+        SNAME|SOREG,    TWORD|TPOINT,
  56+        SAREG|SBREG,    TWORD|TPOINT,
5257                 0,      RDEST,
<>53 -                "       sta AR,ZC,1\n", },
 54 -
 55 -{ ASSIGN,       FOREFF|INAREG,
 56 -        SOREG,  TWORD|TPOINT,
 57 -        SAREG,  TWORD|TPOINT,
 58 -                0,      RDEST,
5958                 "       sta AR,AL\n", },
<> 59+/* mem->reg */
  60+{ ASSIGN,       FOREFF|INAREG|INBREG,
  61+        SAREG|SBREG,    TWORD|TPOINT,
  62+        SNAME|SOREG,    TWORD|TPOINT,
  63+                0,      RDEST,
  64+                "       lda AL,AR\n", },
6065 
<>61 -{ OPLTYPE,      INAREG,
  66+/*
  67+ * LEAF type movements.
  68+ */
  69+/* 0 -> reg */
  70+{ OPLTYPE,      INAREG|INBREG,
6271         SANY,   TANY,
<>63 -        SONE,   TWORD,
  72+        SZERO,  TWORD,
6473                 NAREG,  RESC1,
<>65 -                "       subzl A1,A1ZA\n", },
  74+                "       subo A1,A1\n", },
6675 
<>67 -{ OPLTYPE,      INAREG,
  76+/* 1 -> reg */
  77+{ OPLTYPE,      INAREG|INBREG,
6878         SANY,   TANY,
<>69 -        SCON,   TWORD,
 70 -                NAREG,  RESC1,
 71 -                "       lda A1,ZB,1\n", },
  79+        SONE,   TWORD,
  80+                NAREG|NBREG,    RESC1,
  81+                "       subzl A1,A1     # 1\n", },
7282 
<>73 -{ OPLTYPE,      INAREG,
  83+/* constant -> reg */
  84+{ OPLTYPE,      INAREG|INBREG,
7485         SANY,   TANY,
<>75 -        SZERO,  TWORD,
  86+        SCON,   TWORD|TPOINT,
  87+                NAREG|NBREG,    RESC1,
  88+                "       lda A1,AR\n", },
  89+
  90+/* mem -> reg */
  91+{ OPLTYPE,      INAREG,
  92+        SANY,           TANY,
  93+        SNAME|SOREG,    TWORD,
7694                 NAREG,  RESC1,
<>77 -                "       sub A1,A1ZA\n", },
  95+                "       lda A1,AR\n", },
7896 
<> 97+/* reg -> A-reg */
7998 { OPLTYPE,      INAREG,
<>80 -        SANY,   TANY,
 81 -        SNAME,  TWORD|TPOINT,
  99+        SANY,           TANY,
  100+        SAREG|SBREG,    TWORD,
82101                 NAREG,  RESC1,
<>83 -                "       lda A1,ZD,1\n", },
  102+                "       mov AR,A1\n", },
84103 
<> 104+/* reg -> B-reg */
85105 { OPLTYPE,      INBREG,
<>86 -        SANY,   TANY,
 87 -        SNAME,  TWORD|TPOINT,
  106+        SANY,           TANY,
  107+        SAREG|SBREG,    TWORD,
88108                 NBREG,  RESC1,
<>89 -                "       lda A1,ZD,1\n", },
  109+                "       mov AR,A1\n", },
90110 
 91111 { OPLTYPE,      INBREG,
<>92 -        SANY,   TANY,
 93 -        SCREG,  TWORD|TPOINT,
  112+        SANY,           TANY,
  113+        SNAME|SOREG,    TPOINT,
94114                 NBREG,  RESC1,
 95115                 "       lda A1,AR\n", },
 96116 
<>97 -{ PLUSINBREG|INAREG,
  117+{ OPLTYPE,      INBREG,
  118+        SANY,           TANY,
  119+        SLDFPSP,        TANY,
  120+                NBREG,  RESC1,
  121+                "       lda A1,AR\n", },
  122+
  123+/*
  124+ * Simple ops.
  125+ */
  126+{ PLUS,         INBREG|INAREG,
98127         SAREG|SBREG,    TWORD|TPOINT,
 99128         SONE,           TANY,
 100129                 0,      RLEFT,
     
 !
106135                 0,      RLEFT,
 107136                 "       O AR,AL\n", },
 108137 
<> 138+/*
  139+ * Indirections
  140+ */
109141 { UMULINAREG,
 110142         SANY,   TPOINT|TWORD,
 111143         SOREG,  TPOINT|TWORD,
 112144                 NAREG|NASL,     RESC1,
<>113 -                "       lda A1,AL\n", },
  145+                "       lda A1,AL #\n", },
114146 
<> 147+{ UMULINAREG,
  148+        SANY,   TPOINT|TWORD,
  149+        SOREG,  TCHAR|TUCHAR,
  150+                NAREG|NASL,     RESC1,
  151+                "       lda A1,AL #\n", },
  152+
  153+{ UMULINBREG,
  154+        SANY,   TPOINT|TWORD,
  155+        SOREG,  TPOINT|TWORD,
  156+                NBREG|NBSL,     RESC1,
  157+                "       lda A1,AL  # #\n", },
  158+
115159 #if 0
 116160 
 117161 /* PCONVs are usually not necessary */
     
 !
435479                 "       popl A1\n       popl U1\n", },
 436480 
 437481 /* slut sconv */
<> 482+#endif
438483 
 439484 /*
 440485  * Subroutine calls.
     
 !
444489         SCON,   TANY,
 445490         SANY,   TANY,
 446491                 0,      0,
<>447 -                "       call CL\nZC", },
  492+                "       jsr CL\nZC", },
448493 
 449494 { UCALL,        FOREFF,
 450495         SCON,   TANY,
<>451 -        SAREG,  TWORD|TPOINT,
  496+        SANY,   TANY,
452497                 0,      0,
<>453 -                "       call CL\n", },
  498+                "       jsr CL\n", },
454499 
<> 500+{ CALL,         INAREG|FOREFF,
  501+        SCON,   TANY,
  502+        SANY,   TANY,
  503+                NAREG|NASL,     RESC1,
  504+                "       jsr CL\nZC", },
  505+
  506+{ UCALL,        INAREG|FOREFF,
  507+        SCON,   TANY,
  508+        SANY,   TANY,
  509+                NAREG|NASL,     RESC1,
  510+                "       jsr CL\n", },
  511+
  512+#if 0
455513 { CALLINAREG,
 456514         SCON,   TANY,
 457515         SAREG,  TWORD|TPOINT,
     
 !
14151473         SANY,   TLL,
 14161474                 0,      RNULL,
 14171475                 "       pushl UL\n      pushl AL\n", },
<> 1476+#endif
14181477 
 14191478 { FUNARG,       FOREFF,
<>1420 -        SCON|SAREG|SNAME|SOREGTWORD|TPOINT,
 1421 -        SANY,   TWORD|TPOINT,
  1479+        SAREG|SBREG,    TCHAR|TUCHAR|TWORD|TPOINT,
  1480+        SANY,           TCHAR|TUCHAR|TWORD|TPOINT,
14221481                 0,      RNULL,
<>1423 -                "       pushl AL\n", },
  1482+                "       sta AL,@sp\n", },
14241483 
<> 1484+#if 0
<_14251485 { FUNARG,       FOREFF,
 14261486         SCON,   TWORD|TSHORT|TUSHORT|TCHAR|TUCHAR,
 14271487         SANY,   TWORD|TSHORT|TUSHORT|TCHAR|TUCHAR,
FishEye: Open Source License registered to PCC.
Atlassian FishEye, CVS analysis. (Version:1.6.3 Build:build-336 2008-11-04) - Administration - Page generated 2014-12-18 19:20 +0100