admin/mruby-mruby
1
0
Fork 0
mirror of https://github.com/mruby/mruby synced 2026-06-08 16:11:16 +00:00
Code Issues Packages Projects Releases Wiki Activity

Merge pull request #330 from monaka/pr-fix-parser-y-to-supress-warning-array-subscript

Browse Source 
Supress "warning: array subscript has type ‘char’"
This commit is contained in:
Yukihiro "Matz" Matsumoto
2012-06-26 22:43:52 -07:00
parent 7c64a2be8d cd5476c6ae
commit 50f38a7df3
1 changed files with 7 additions and 7 deletions
Download Patch File Download Diff File Expand all files Collapse all files
src/parse.y
+7 -7
View File
@@ -3201,9 +3201,9 @@ toklen(parser_state *p)
#define IS_LABEL_SUFFIX(n) (peek_n(p, ':',(n)) && !peek_n(p, ':', (n)+1))
static unsigned long
scan_oct(const char *start, int len, int *retlen)
scan_oct(const int *start, int len, int *retlen)
{
const char *s = start;
const int *s = start;
unsigned long retval = 0;
while (len-- && *s >= '0' && *s <= '7') {
@@ -3215,10 +3215,10 @@ scan_oct(const char *start, int len, int *retlen)
}
static unsigned long
scan_hex(const char *start, int len, int *retlen)
scan_hex(const int *start, int len, int *retlen)
{
static const char hexdigit[] = "0123456789abcdef0123456789ABCDEF";
register const char *s = start;
register const int *s = start;
register unsigned long retval = 0;
char *tmp;
@@ -3264,7 +3264,7 @@ read_escape(parser_state *p)
case '0': case '1': case '2': case '3': /* octal constant */
case '4': case '5': case '6': case '7':
{
char buf[3];
int buf[3];
int i;
for (i=0; i<3; i++) {
@@ -3281,7 +3281,7 @@ read_escape(parser_state *p)
case 'x': /* hex constant */
{
char buf[2];
int buf[2];
int i;
for (i=0; i<2; i++) {
@@ -4542,7 +4542,7 @@ parser_yylex(parser_state *p)
pushback(p, c);
}
}
if (result == 0 && isupper(tok(p)[0])) {
if (result == 0 && isupper((int)tok(p)[0])) {
result = tCONSTANT;
}
else {