add: more token

DragonLisp.l

@@ -48,6 +48,12 @@ print	(print|PRINT)
 loop	(loop|LOOP)
 setq	(setq|SETQ)
 quote	(quote|QUOTE)
+for		(for|FOR)
+in		(in|IN)
+from	(from|FROM)
+to		(to|TO)
+dotimes	(dotimes|DOTIMES)
+dolist	(dolist|DOLIST)
 defconstant	(defconstant|DEFCONSTANT)
 
 %%

DragonLisp.y

@@ -75,6 +75,12 @@ namespace DragonLisp {
     LOOP		"loop"
     SETQ		"setq"
     QUOTE		"quote"
+    FOR			"for"
+    IN			"in"
+    FROM		"from"
+    TO			"to"
+    DOTIMES		"dotimes"
+    DOLIST		"dolist"
     DEFCONSTANT		"defconstant"
 ;
 

token.h

@@ -41,6 +41,12 @@ enum Token {
 	LOOP,
 	SETQ,
 	QUOTE,
+	FOR,
+	IN,
+	FROM,
+	TO,
+	DOTIMES,
+	DOLIST,
 	DEFCONSTANT,
 };