X-Git-Url: https://git.xonotic.org/?p=xonotic%2Fgmqcc.git;a=blobdiff_plain;f=lexer.c;h=64cdb3d3cff06b7212c7caf4cc44472ebe700d1e;hp=43182c335ae93ef94bf262ce82c065375a9b1423;hb=caa44e82e05932a8ff22378b285b52c449c7ee50;hpb=3567abbd64d4cb5a0db5e434955c83a924635d6f diff --git a/lexer.c b/lexer.c index 43182c3..64cdb3d 100644 --- a/lexer.c +++ b/lexer.c @@ -1,5 +1,5 @@ /* - * Copyright (C) 2012 + * Copyright (C) 2012, 2013 * Wolfgang Bumiller * * Permission is hereby granted, free of charge, to any person obtaining a copy of @@ -485,7 +485,7 @@ unroll: if (command) { vec_pop(command); while (vec_size(command)) { - lex_ungetch(lex, vec_last(command)); + lex_ungetch(lex, (unsigned char)vec_last(command)); vec_pop(command); } vec_free(command); @@ -494,7 +494,7 @@ unroll: if (command) { vec_pop(command); while (vec_size(command)) { - lex_ungetch(lex, vec_last(command)); + lex_ungetch(lex, (unsigned char)vec_last(command)); vec_pop(command); } vec_free(command); @@ -503,7 +503,7 @@ unroll: if (pragma) { vec_pop(pragma); while (vec_size(pragma)) { - lex_ungetch(lex, vec_last(pragma)); + lex_ungetch(lex, (unsigned char)vec_last(pragma)); vec_pop(pragma); } vec_free(pragma); @@ -742,6 +742,7 @@ static bool lex_finish_frames(lex_file *lex) static int GMQCC_WARN lex_finish_string(lex_file *lex, int quote) { + uchar_t chr; int ch = 0; int nextch; bool hex; @@ -827,7 +828,7 @@ static int GMQCC_WARN lex_finish_string(lex_file *lex, int quote) case '[': ch = 16; break; case ']': ch = 17; break; case '{': - ch = 0; + chr = 0; nextch = lex_getch(lex); hex = (nextch == 'x'); if (!hex) @@ -835,32 +836,31 @@ static int GMQCC_WARN lex_finish_string(lex_file *lex, int quote) for (nextch = lex_getch(lex); nextch != '}'; nextch = lex_getch(lex)) { if (!hex) { if (nextch >= '0' && nextch <= '9') - ch = ch * 10 + nextch - '0'; + chr = chr * 10 + nextch - '0'; else { lexerror(lex, "bad character code"); return (lex->tok.ttype = TOKEN_ERROR); } } else { - if (nextch >= '0' || nextch <= '9') - ch = ch * 16 + nextch - '0'; + if (nextch >= '0' && nextch <= '9') + chr = chr * 0x10 + nextch - '0'; else if (nextch >= 'a' && nextch <= 'f') - ch = ch * 16 + nextch - 'a' + 10; + chr = chr * 0x10 + nextch - 'a' + 10; else if (nextch >= 'A' && nextch <= 'F') - ch = ch * 16 + nextch - 'A' + 10; + chr = chr * 0x10 + nextch - 'A' + 10; else { lexerror(lex, "bad character code"); return (lex->tok.ttype = TOKEN_ERROR); } } - if ( (!OPTS_FLAG(UTF8) && ch > 255) || - ( OPTS_FLAG(UTF8) && ch > 0x10FFFF) ) + if (chr > 0x10FFFF || (!OPTS_FLAG(UTF8) && chr > 255)) { lexerror(lex, "character code out of range"); return (lex->tok.ttype = TOKEN_ERROR); } } - if (OPTS_FLAG(UTF8) && ch >= 128) { - u8len = u8_fromchar((uchar_t)ch, u8buf, sizeof(u8buf)); + if (OPTS_FLAG(UTF8) && chr >= 128) { + u8len = u8_fromchar(chr, u8buf, sizeof(u8buf)); if (!u8len) ch = 0; else { @@ -873,6 +873,8 @@ static int GMQCC_WARN lex_finish_string(lex_file *lex, int quote) ch = u8buf[uc]; } } + else + ch = chr; break; case '\n': ch = '\n'; break; @@ -1297,6 +1299,17 @@ int lex_do(lex_file *lex) lex_tokench(lex, nextch); lex_tokench(lex, thirdch); } + } + else if (lex->flags.preprocessing && + ch == '-' && isdigit(nextch)) + { + lex->tok.ttype = lex_finish_digit(lex, nextch); + if (lex->tok.ttype == TOKEN_INTCONST) + lex->tok.constval.i = -lex->tok.constval.i; + else + lex->tok.constval.f = -lex->tok.constval.f; + lex_endtoken(lex); + return lex->tok.ttype; } else lex_ungetch(lex, nextch);