X-Git-Url: https://git.sur5r.net/?a=blobdiff_plain;f=src%2Fcc65%2Fscanner.c;h=a0ff4530497c3a5563c54fe9b6426f17f6c731e3;hb=4a667ead00c10797fb57298b3dd33c2efc6c8d3f;hp=05ececed3e2be877f9dbc81c68dd22729ccd0eba;hpb=f08179d6af38ab89df3fba0ecd6642af909da8a0;p=cc65

diff --git a/src/cc65/scanner.c b/src/cc65/scanner.c
index 05ececed3..a0ff45304 100644
--- a/src/cc65/scanner.c
+++ b/src/cc65/scanner.c
@@ -81,8 +81,8 @@ static const struct Keyword {
     unsigned char   Type;      	/* Token type */
 } Keywords [] = {
     { "_Pragma",        TOK_PRAGMA,     TT_C    },
-    { "__A__",	       	TOK_A,	       	TT_C   	},
     { "__AX__",	       	TOK_AX,		TT_C  	},
+    { "__A__",	       	TOK_A,	       	TT_C   	},
     { "__EAX__",       	TOK_EAX,   	TT_C  	},
     { "__X__", 	       	TOK_X,		TT_C  	},
     { "__Y__", 	       	TOK_Y,		TT_C  	},
@@ -128,7 +128,7 @@ static const struct Keyword {
     { "void",  	       	TOK_VOID,  	TT_C	},
     { "volatile",      	TOK_VOLATILE,   TT_C	},
     { "while", 	       	TOK_WHILE, 	TT_C	},
-};                              
+};
 #define KEY_COUNT	(sizeof (Keywords) / sizeof (Keywords [0]))
 
 
@@ -243,8 +243,8 @@ static void SetTok (int tok)
 static int ParseChar (void)
 /* Parse a character. Converts \n into EOL, etc. */
 {
-    int i;
-    unsigned val;
+    int I;
+    unsigned Val;
     int C;
 
     /* Check for escape chars */
@@ -253,51 +253,71 @@ static int ParseChar (void)
 	switch (CurC) {
 	    case 'b':
 	       	C = '\b';
-	   	break;
+	      	break;
      	    case 'f':
-	   	C = '\f';
-		break;
+	      	C = '\f';
+	      	break;
 	    case 'r':
-		C = '\r';
-		break;
+	      	C = '\r';
+	      	break;
 	    case 'n':
-		C = '\n';
-		break;
+	      	C = '\n';
+	      	break;
 	    case 't':
-		C = '\t';
-		break;
+	      	C = '\t';
+	      	break;
+            case 'v':
+                C = '\v';
+                break;
 	    case '\"':
-		C = '\"';
-		break;
+	      	C = '\"';
+	      	break;
 	    case '\'':
-		C = '\'';
-		break;
+	      	C = '\'';
+	      	break;
 	    case '\\':
-		C = '\\';
-		break;
+	      	C = '\\';
+	      	break;
 	    case 'x':
 	    case 'X':
-		/* Hex character constant */
-		NextChar ();
-		val = HexVal (CurC) << 4;
-		NextChar ();
-       	       	C = val | HexVal (CurC); 	/* Do not translate */
-		break;
+	      	/* Hex character constant */
+	      	NextChar ();
+	       	Val = HexVal (CurC) << 4;
+	      	NextChar ();
+       	       	C = Val | HexVal (CurC); 	/* Do not translate */
+	      	break;
 	    case '0':
 	    case '1':
 	    case '2':
 	    case '3':
+	    case '4':
+	    case '5':
+	    case '6':
+	    case '7':
 		/* Octal constant */
-		i = 0;
-     		C = CurC - '0';
-       	       	while (NextC >= '0' && NextC <= '7' && i++ < 4) {
+		I = 0;
+       	       	Val = CurC - '0';
+       	       	while (NextC >= '0' && NextC <= '7' && ++I <= 3) {
      	 	    NextChar ();
-     	       	    C = (C << 3) | (CurC - '0');
+     	       	    Val = (Val << 3) | (CurC - '0');
      		}
+                C = (int) Val;
+                if (Val >= 256) {
+                    Error ("Character constant out of range");
+                    C = ' ';
+                }
      		break;
      	    default:
      		Error ("Illegal character constant");
 		C = ' ';
+                /* Try to do error recovery, otherwise the compiler will spit
+                 * out thousands of errors in this place and abort.
+                 */
+                if (CurC != '\'' && CurC != '\0') {
+                    while (NextC != '\'' && NextC != '\"' && NextC != '\0') {
+                        NextChar ();
+                    }
+                }
 		break;
      	}
     } else {
@@ -396,6 +416,14 @@ void NextToken (void)
     }
     CurTok = NextTok;
 
+    /* When reading the first time from the file, the line info in NextTok,
+     * which was copied to CurTok is invalid. Since the information from
+     * the token is used for error messages, we must make it valid.
+     */
+    if (CurTok.LI == 0) {
+	CurTok.LI = UseLineInfo (GetCurLineInfo ());
+    }
+
     /* Remember the starting position of the next token */
     NextTok.LI = UseLineInfo (GetCurLineInfo ());