Simplify parsing of DIM.

Author: dmsc

src/basic.syn

@@ -502,12 +502,12 @@ TYPE_BYTE:
         "Byte" emit VT_ARRAY_BYTE
 
 DIM_VAR_TYPE:
-        "$" PAR_EXPR emit { TOK_PUSH_BYTE, 1, TOK_ADD, TOK_USHL, VT_ARRAY_STRING }
+        "$" PAR_EXPR emit { TOK_PUSH_1, TOK_ADD, TOK_USHL, VT_ARRAY_STRING }
 #@if FASTBASIC_FP
-        "%" PAR_EXPR emit { TOK_PUSH_BYTE, 1, TOK_ADD, TOK_MUL6, VT_ARRAY_FLOAT }
+        "%" PAR_EXPR emit { TOK_PUSH_1, TOK_ADD, TOK_MUL6, VT_ARRAY_FLOAT }
 #@endif FASTBASIC_FP
-        PAR_EXPR     emit { TOK_PUSH_BYTE, 1, TOK_ADD } TYPE_BYTE
-        PAR_EXPR     emit { TOK_PUSH_BYTE, 1, TOK_ADD, TOK_USHL } TYPE_WORD
+        PAR_EXPR     emit { TOK_PUSH_1, TOK_ADD } TYPE_BYTE
+        PAR_EXPR     emit { TOK_PUSH_1, TOK_ADD, TOK_USHL } TYPE_WORD
 
 DIM_VAR: new variable name
         E_VAR_CREATE E_PUSH_VAR DIM_VAR_TYPE E_VAR_SET_TYPE emit TOK_DIM E_POP_VAR