sergiotarxz/nuttx-apps
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Cosmetic

Browse Source
This commit is contained in:
Gregory Nutt 2014-11-08 07:19:29 -06:00
parent 31330b56c0
commit 31d52eecda
2 changed files with 5 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
interpreters/bas/statement.c
View File

@ -907,8 +907,7 @@ struct Value *stmt_DIM(struct Value *value)
return value;
}
if (pass == INTERPRET && value->u.integer < optionbase) /* error
*/
if (pass == INTERPRET && value->u.integer < optionbase) /* error */
{
Value_destroy(value);
Value_new_ERROR(value, OUTOFRANGE, _("dimension"));
@ -2840,8 +2839,7 @@ struct Value *stmt_IF_ELSEIFIF(struct Value *value)
{
pushLabel(L_IF, &ifpc);
}
else /* compile single line IF THEN ELSE recursively
*/
else /* compile single line IF THEN ELSE recursively */
{
if (statements(value)->type == V_ERROR)
{

5
interpreters/bas/token.l
View File

@ -11,6 +11,7 @@
#include <stddef.h>
#include <stdlib.h>
#include <string.h>
#include <termios.h>
#include "auto.h"
#include "token.h"
@ -1173,7 +1174,7 @@ end[ \t]+function {
{
cur->statement=stmt_QUOTE_REM;
strcpy(cur->u.rem=malloc(strlen(yytext+1)+1),yytext+1);
}
}
return T_QUOTE;
}
{LINEINPUT} {
@ -1740,7 +1741,7 @@ struct String *Token_toString(struct Token *token, struct Token *spaceto, struct
++thisnotindent; ++nextindent;
}
break;
}
}
case T_SELECTCASE: thisnotindent+=2; nextindent+=2; break;
case T_EQ:
{