/[smarc]/smarc/src/spasm/spasm.lex
ViewVC logotype

Diff of /smarc/src/spasm/spasm.lex

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.2 by batonik, Sat Dec 28 21:29:26 2002 UTC revision 1.3 by batonik, Tue Dec 31 00:38:13 2002 UTC
# Line 7  Line 7 
7  _SPACJE         [ \t]  _SPACJE         [ \t]
8  _KOMENTARZ      "!"  _KOMENTARZ      "!"
9  _PRZECINEK      ","  _PRZECINEK      ","
10    _MINUS          "-"
11    
12  _ETYKIETA       [a-zA-Z][a-zA-Z0-9_]*  _ETYKIETA       [a-zA-Z][a-zA-Z0-9_]*
13  _LICZBA         [0-9]+|"0x"[0-9a-fA-F]+  _LICZBA         [0-9]+|"0x"[0-9a-fA-F]+
# Line 17  _HI            "%"[hH][iI] Line 18  _HI            "%"[hH][iI]
18  _LO             "%"[lL][oO]  _LO             "%"[lL][oO]
19  _NAWIASL        "("  _NAWIASL        "("
20  _NAWIASP        ")"  _NAWIASP        ")"
21    _NAWIAS_KL      "["
22    _NAWIAS_KP      "]"
23    
24  _ALNUM          {_ETYKIETA}  _ALNUM          {_ETYKIETA}
25  _ZNAK_ROWN      "="  _ZNAK_ROWN      "="
# Line 119  _PR_NOP                "nop" Line 122  _PR_NOP                "nop"
122  ^{_SPACJE}+                             /* wcinamy spacje */  ^{_SPACJE}+                             /* wcinamy spacje */
123  ^{_SPACJE}*{_KOMENTARZ}+.*[^\n]         /* ...i komentarze */  ^{_SPACJE}*{_KOMENTARZ}+.*[^\n]         /* ...i komentarze */
124    
125  {_ETYKIETA}":"          return (ETYKIETA);  {_ETYKIETA}":"          {
126                                    yylval.string = yytext;
127                                    yylval.string[yyleng-2] = (char) 0;
128                                    return (ETYKIETA);
129                            }
130    
131  {_B_BN}{_SPACJE}                yylval.lcalk = CND_BN;  return (B_BN);  {_B_BN}{_SPACJE}        yylval.lcalk = CND_BN;          return (B_BN);
132  {_B_BE}{_SPACJE}                yylval.lcalk = CND_BE;  return (B_BE);  {_B_BE}{_SPACJE}        yylval.lcalk = CND_BE;          return (B_BE);
133  {_B_BLE}{_SPACJE}               yylval.lcalk = CND_BLE; return (B_BLE);  {_B_BLE}{_SPACJE}       yylval.lcalk = CND_BLE;         return (B_BLE);
134  {_B_BL}{_SPACJE}                yylval.lcalk = CND_BL;  return (B_BL);  {_B_BL}{_SPACJE}        yylval.lcalk = CND_BL;          return (B_BL);
135  {_B_BLEU}{_SPACJE}              yylval.lcalk = CND_BLEU;return (B_BLEU);  {_B_BLEU}{_SPACJE}      yylval.lcalk = CND_BLEU;        return (B_BLEU);
136  {_B_BCS}{_SPACJE}               yylval.lcalk = CND_BCS; return (B_BCS);  {_B_BCS}{_SPACJE}       yylval.lcalk = CND_BCS;         return (B_BCS);
137  {_B_BNEG}{_SPACJE}              yylval.lcalk = CND_BNEG;return (B_BNEG);  {_B_BNEG}{_SPACJE}      yylval.lcalk = CND_BNEG;        return (B_BNEG);
138  {_B_BVS}{_SPACJE}               yylval.lcalk = CND_BVS; return (B_BVS);  {_B_BVS}{_SPACJE}       yylval.lcalk = CND_BVS;         return (B_BVS);
139  {_B_BA}{_SPACJE}                yylval.lcalk = CND_BA;  return (B_BA);  {_B_BA}{_SPACJE}        yylval.lcalk = CND_BA;          return (B_BA);
140  {_B_BNE}{_SPACJE}               yylval.lcalk = CND_BNE; return (B_BNE);  {_B_BNE}{_SPACJE}       yylval.lcalk = CND_BNE;         return (B_BNE);
141  {_B_BG}{_SPACJE}                yylval.lcalk = CND_BG;  return (B_BG);  {_B_BG}{_SPACJE}        yylval.lcalk = CND_BG;          return (B_BG);
142  {_B_BGE}{_SPACJE}               yylval.lcalk = CND_BGE; return (B_BGE);  {_B_BGE}{_SPACJE}       yylval.lcalk = CND_BGE;         return (B_BGE);
143  {_B_BGU}{_SPACJE}               yylval.lcalk = CND_BGU; return (B_BGU);  {_B_BGU}{_SPACJE}       yylval.lcalk = CND_BGU;         return (B_BGU);
144  {_B_BCC}{_SPACJE}               yylval.lcalk = CND_BCC; return (B_BCC);  {_B_BCC}{_SPACJE}       yylval.lcalk = CND_BCC;         return (B_BCC);
145  {_B_BPOS}{_SPACJE}              yylval.lcalk = CND_BPOS;return (B_BPOS);  {_B_BPOS}{_SPACJE}      yylval.lcalk = CND_BPOS;        return (B_BPOS);
146  {_B_BVC}{_SPACJE}               yylval.lcalk = CND_BVC; return (B_BVC);  {_B_BVC}{_SPACJE}       yylval.lcalk = CND_BVC;         return (B_BVC);
147    
148  {_R_ADD}{_SPACJE}       yylval.lcalk = OPC_ADD;         return(R_ADD);  {_R_ADD}{_SPACJE}       yylval.lcalk = OPC_ADD;         return(R_ADD);
149  {_R_AND}{_SPACJE}       yylval.lcalk = OPC_AND;         return(R_AND);  {_R_AND}{_SPACJE}       yylval.lcalk = OPC_AND;         return(R_AND);
# Line 194  _PR_NOP                "nop" Line 200  _PR_NOP                "nop"
200  {_PR_NOP}{_SPACJE}*     return(PR_NOP);  {_PR_NOP}{_SPACJE}*     return(PR_NOP);
201    
202    
203    {_ASCII}                return (ASCII);
204    {_TEXT}                 return (TEXT);
205    {_ALIGN}                return (ALIGN);
206    {_DATA}                 return (DATA);
207    {_SKIP}                 return (SKIP);
208    {_BYTE}                 return (BYTE);
209    {_HALF}                 return (HALF);
210    {_WORD}                 return (WORD);
211    
212    
213    {_MINUS}                return (MINUS);
214    
215  {_ALNUM}                return (CIAG_ALNUM);  {_ALNUM}                yylval.string = yytext; return (CIAG_ALNUM);
216  {_ZNAK_ROWN}            return (ZNAK_ROWN);  {_ZNAK_ROWN}            return (ZNAK_ROWN);
217    
218  {_LICZBA}               yylval.lcalk = strtoul(yytext, NULL, 0); return (LICZBA);  {_LICZBA}               yylval.lcalk = strtoul(yytext, NULL, 0); return (LICZBA);
# Line 254  _PR_NOP                "nop" Line 270  _PR_NOP                "nop"
270                                          return(CUDZYSLOW);                                          return(CUDZYSLOW);
271                                  }                                  }
272    
 {_ASCII}                return (ASCII);  
 {_TEXT}                 return (TEXT);  
 {_ALIGN}                return (ALIGN);  
 {_DATA}                 return (DATA);  
 {_SKIP}                 return (SKIP);  
 {_BYTE}                 return (BYTE);  
 {_HALF}                 return (HALF);  
 {_WORD}                 return (WORD);  
   
273  {_PRZECINEK}            return (PRZECINEK);  {_PRZECINEK}            return (PRZECINEK);
274    
275    
276  {_REJESTR}              {  {_REJESTR}              {
277                                  int ileDodac = 0;                                  int ileDodac = 0;
278                                  int wartosc = 0;                                  int wartosc = 0;
# Line 317  _PR_NOP                "nop" Line 325  _PR_NOP                "nop"
325  {_LO}                   return (LO);  {_LO}                   return (LO);
326  {_NAWIASL}              return (NAWIASL);  {_NAWIASL}              return (NAWIASL);
327  {_NAWIASP}              return (NAWIASP);  {_NAWIASP}              return (NAWIASP);
328    {_NAWIAS_KL}            return (NAWIAS_KL);
329    {_NAWIAS_KP}            return (NAWIAS_KP);
330    
331    
332    

Legend:
Removed from v.1.2  
changed lines
  Added in v.1.3

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26