Merge branch 'master' of github.com:mruby/mruby

include/mruby/compile.h

@@ -113,6 +113,7 @@ struct mrb_parser_state {
   char const *filename;
   int lineno;
   int column;
+  int eof;
 
   enum mrb_lex_state_enum lstate;
   mrb_ast_node *lex_strterm; /* (type nest_level beg . end) */

src/numeric.c

@@ -1071,7 +1071,7 @@ mrb_flo_to_fixnum(mrb_state *mrb, mrb_value x)
 
   if (mrb_float_p(x)) {
      mrb_raise(mrb, E_TYPE_ERROR, "non float value");
-     z = 0; /* not reached. just supress warnings. */
+     z = 0; /* not reached. just suppress warnings. */
   }
   else {
     mrb_float d = mrb_float(x);

src/parse.y

@@ -3316,14 +3316,14 @@ nextc(parser_state *p)
   else {
 #ifdef ENABLE_STDIO
     if (p->f) {
-      if (feof(p->f)) goto end_retry;
+      if (feof(p->f)) goto eof;
       c = fgetc(p->f);
-      if (c == EOF) goto end_retry;
+      if (c == EOF) goto eof;
     }
     else
 #endif
     if (!p->s || p->s >= p->send) {
-       goto end_retry;
+       goto eof;
     }
     else {
       c = (unsigned char)*p->s++;
@@ -3332,14 +3332,20 @@ nextc(parser_state *p)
   p->column++;
   return c;
 
- end_retry:
+ eof:
+  if (!p->eof) {
+    p->eof = TRUE;
+    return '\n';
+  }
+
   if (!p->cxt) return -1;
   else {
     mrbc_context *cxt = p->cxt;
 
     if (cxt->partial_hook(p) < 0) return -1;
-    c = '\n';
-    p->lineno = 1;
+    p->eof = FALSE;
+    p->cxt = NULL;
+    c = nextc(p);
     p->cxt = cxt;
     return c;
   }