"Fossies" - the Fresh Open Source Software Archive  

Source code changes of the file "token.l" between
bas-2.5.tar.gz and bas-2.6.tar.gz

About: bas is an interpreter for the programming language BASIC.

token.l  (bas-2.5):token.l  (bas-2.6)
skipping to change at line 522 skipping to change at line 522
} }
return T_FIELD; return T_FIELD;
} }
"field"/"#" { "field"/"#" {
if (cur) if (cur)
{ {
cur->statement=stmt_FIELD; cur->statement=stmt_FIELD;
} }
return T_FIELD; return T_FIELD;
} }
"files" {
if (cur)
{
cur->statement=stmt_FILES;
}
return T_FILES;
}
"fnend" { "fnend" {
if (cur) if (cur)
{ {
cur->statement=stmt_EQ_FNRETURN_FNEND; cur->statement=stmt_EQ_FNRETURN_FNEND;
} }
return T_FNEND; return T_FNEND;
} }
"fnreturn" { "fnreturn" {
if (cur) if (cur)
{ {
skipping to change at line 998 skipping to change at line 1005
return T_SHELL; return T_SHELL;
} }
"sleep" { "sleep" {
if (cur) if (cur)
{ {
cur->statement=stmt_SLEEP; cur->statement=stmt_SLEEP;
} }
return T_SLEEP; return T_SLEEP;
} }
"spc" return T_SPC; "spc" return T_SPC;
"step" return T_STEP; "step" {
if (cur)
{
Value_new_NIL(&cur->u.step);
}
return T_STEP;
}
"stop" { "stop" {
if (cur) if (cur)
{ {
cur->statement=stmt_STOP; cur->statement=stmt_STOP;
} }
return T_STOP; return T_STOP;
} }
"sub"[ \t]*"end" { "sub"[ \t]*"end" {
if (cur) if (cur)
{ {
skipping to change at line 1377 skipping to change at line 1390
case T_ENDPROC: break; case T_ENDPROC: break;
case T_ENDSELECT: break; case T_ENDSELECT: break;
case T_ENVIRON: break; case T_ENVIRON: break;
case T_EOL: break; case T_EOL: break;
case T_EQ: break; case T_EQ: break;
case T_EQV: break; case T_EQV: break;
case T_ERASE: break; case T_ERASE: break;
case T_EXITDO: break; case T_EXITDO: break;
case T_EXITFOR: break; case T_EXITFOR: break;
case T_FIELD: break; case T_FIELD: break;
case T_FILES: break;
case T_FNEND: break; case T_FNEND: break;
case T_FNEXIT: break; case T_FNEXIT: break;
case T_FNRETURN: break; case T_FNRETURN: break;
case T_FOR: break; case T_FOR: break;
case T_FOR_INPUT: break; case T_FOR_INPUT: break;
case T_FOR_OUTPUT: break; case T_FOR_OUTPUT: break;
case T_FOR_APPEND: break; case T_FOR_APPEND: break;
case T_FOR_RANDOM: break; case T_FOR_RANDOM: break;
case T_FOR_BINARY: break; case T_FOR_BINARY: break;
case T_FUNCTION: break; case T_FUNCTION: break;
skipping to change at line 1474 skipping to change at line 1488
case T_RETURN: break; case T_RETURN: break;
case T_RSET: break; case T_RSET: break;
case T_RUN: break; case T_RUN: break;
case T_SAVE: break; case T_SAVE: break;
case T_SELECTCASE: free(r->u.selectcase); break; case T_SELECTCASE: free(r->u.selectcase); break;
case T_SEMICOLON: break; case T_SEMICOLON: break;
case T_SHARED: break; case T_SHARED: break;
case T_SHELL: break; case T_SHELL: break;
case T_SLEEP: break; case T_SLEEP: break;
case T_SPC: break; case T_SPC: break;
case T_STEP: break; case T_STEP: Value_destroy(&r->u.step); break;
case T_STOP: break; case T_STOP: break;
case T_STRING: String_destroy(r->u.string); free(r->u.string); break; case T_STRING: String_destroy(r->u.string); free(r->u.string); break;
case T_SUB: break; case T_SUB: break;
case T_SUBEND: break; case T_SUBEND: break;
case T_SUBEXIT: break; case T_SUBEXIT: break;
case T_SWAP: break; case T_SWAP: break;
case T_SYSTEM: break; case T_SYSTEM: break;
case T_TAB: break; case T_TAB: break;
case T_THEN: break; case T_THEN: break;
case T_TO: break; case T_TO: break;
skipping to change at line 1573 skipping to change at line 1587
/* T_ENDPROC */ {"end proc",1}, /* T_ENDPROC */ {"end proc",1},
/* T_ENDSELECT */ {"end select",1}, /* T_ENDSELECT */ {"end select",1},
/* T_ENVIRON */ {"environ",1}, /* T_ENVIRON */ {"environ",1},
/* T_EOL */ {"\n",0}, /* T_EOL */ {"\n",0},
/* T_EQ */ {"=",0}, /* T_EQ */ {"=",0},
/* T_EQV */ {"eqv",0}, /* T_EQV */ {"eqv",0},
/* T_ERASE */ {"erase",1}, /* T_ERASE */ {"erase",1},
/* T_EXITDO */ {"exit do",1}, /* T_EXITDO */ {"exit do",1},
/* T_EXITFOR */ {"exit for",1}, /* T_EXITFOR */ {"exit for",1},
/* T_FIELD */ {"field",1}, /* T_FIELD */ {"field",1},
/* T_FILES */ {"files",1},
/* T_FNEND */ {"fnend",1}, /* T_FNEND */ {"fnend",1},
/* T_FNEXIT */ {"exit function",1}, /* T_FNEXIT */ {"exit function",1},
/* T_FNRETURN */ {"fnreturn",1}, /* T_FNRETURN */ {"fnreturn",1},
/* T_FOR */ {"for",1}, /* T_FOR */ {"for",1},
/* T_FOR_INPUT */ {"for input",1}, /* T_FOR_INPUT */ {"for input",1},
/* T_FOR_OUTPUT */ {"for output",1}, /* T_FOR_OUTPUT */ {"for output",1},
/* T_FOR_APPEND */ {"for append",1}, /* T_FOR_APPEND */ {"for append",1},
/* T_FOR_RANDOM */ {"for random",1}, /* T_FOR_RANDOM */ {"for random",1},
/* T_FOR_BINARY */ {"for binary",1}, /* T_FOR_BINARY */ {"for binary",1},
/* T_FUNCTION */ {"function",1}, /* T_FUNCTION */ {"function",1},
 End of changes. 5 change blocks. 
2 lines changed or deleted 17 lines changed or added

Home  |  About  |  Features  |  All  |  Newest  |  Dox  |  Diffs  |  RSS Feeds  |  Screenshots  |  Comments  |  Imprint  |  Privacy  |  HTTP(S)