/[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.6 by batonik, Fri Jan 3 13:34:13 2003 UTC revision 1.7 by batonik, Sat Jan 4 15:17:14 2003 UTC
# Line 5  Line 5 
5    
6    
7  _SPACJE         [ \t]  _SPACJE         [ \t]
8  _KOMENTARZ      "!"  _KOMENTARZ      "\!"
9  _PRZECINEK      ","  _PRZECINEK      ","
10  _MINUS          "-"  _MINUS          "-"
11  _PLUS           "+"  _PLUS           "+"
# Line 120  _PR_NOP                "nop" Line 120  _PR_NOP                "nop"
120    
121  %%  %%
122    
123    {_SPACJE}*{_KOMENTARZ}+.*[^\n]  /* wcinamy komentarze */
124  ^{_SPACJE}+                             /* wcinamy spacje */  ^{_SPACJE}+                             /* wcinamy spacje */
 ^{_SPACJE}*{_KOMENTARZ}+.*[^\n]         /* ...i komentarze */  
125    
126  {_ETYKIETA}":"          {  {_ETYKIETA}":"          {
127                                  yylval.string = yytext;                                  yylval.string = yytext;
# Line 330  _PR_NOP                "nop" Line 330  _PR_NOP                "nop"
330  {_NAWIAS_KL}            return (NAWIAS_KL);  {_NAWIAS_KL}            return (NAWIAS_KL);
331  {_NAWIAS_KP}            return (NAWIAS_KP);  {_NAWIAS_KP}            return (NAWIAS_KP);
332    
   
   
 {_KOMENTARZ}+.*[^\n]    /* komentarze po jakiejś komendzie/dyrektywie... */  
333  {_SPACJE}+              /* zbędne spacje */  {_SPACJE}+              /* zbędne spacje */
334    
   
335  \n                      ++numerLinii; return (NLINIA);  \n                      ++numerLinii; return (NLINIA);
336  .                       return ((char) *yytext);  .

Legend:
Removed from v.1.6  
changed lines
  Added in v.1.7

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