Eatswap
/
DragonLisp
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

fix: token RETURN

This commit is contained in:
Eatswap 2022-12-12 21:39:13 +08:00
parent 568113ad84
commit e7256f0547
Signed by: Eatswap
GPG Key ID: BE661106A1F3FA0B
2 changed files with 7 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
DragonLisp.l
View File

@ -59,6 +59,7 @@ do [dD][oO]
aref [aA][rR][eE][fF] aref [aA][rR][eE][fF]
t [tT] t [tT]
nil [nN][iI][lL] nil [nN][iI][lL]
return [rR][eE][tT][uU][rR][nN]
makearray [mM][aA][kK][eE][-][aA][rR][rR][aA][yY] makearray [mM][aA][kK][eE][-][aA][rR][rR][aA][yY]
defconstant [dD][eE][fF][cC][oO][nN][sS][tT][aA][nN][tT] defconstant [dD][eE][fF][cC][oO][nN][sS][tT][aA][nN][tT]
@ -327,6 +328,11 @@ defconstant [dD][eE][fF][cC][oO][nN][sS][tT][aA][nN][tT]
return token::TOKEN_NIL; return token::TOKEN_NIL;
}; };
{return} {
std::printf("Scanned return\n");
return token::TOKEN_RETURN;
};
{makearray} { {makearray} {
std::printf("Scanned makearray\n"); std::printf("Scanned makearray\n");
return token::TOKEN_MAKE_ARRAY; return token::TOKEN_MAKE_ARRAY;

1
DragonLisp.y
View File

@ -86,6 +86,7 @@ namespace DragonLisp {
AREF "aref" AREF "aref"
T "t" T "t"
NIL "nil" NIL "nil"
RETURN "return"
MAKE_ARRAY "make-array" MAKE_ARRAY "make-array"
DEFCONSTANT "defconstant" DEFCONSTANT "defconstant"
; ;