Fix for issue #45.

When the parser does not recognize a particular syntax, it gobbles up a symbol and tries to pick up from there. It should make an exception for "}" closing a compound statement, however. Otherwise, it may mix up global & local levels.

Author: compuphase

compiler/sc1.c

@@ -890,7 +890,9 @@ int pc_compile(int argc, char *argv[])
       pc_printf("\n%d Warning%s.\n",warnnum,(warnnum>1) ? "s" : "");
     retcode=0;          /* use "0", so that MAKE and similar tools continue */
   } else {
-    retcode=jmpcode;
+    if (verbosity>0)
+      pc_printf("Completed successfully\n");
+    retcode = jmpcode;
   } /* if */
   #if defined __LINUX__ || defined __FreeBSD__ || defined __OpenBSD__
     br_deinit();
@@ -1650,7 +1652,7 @@ static void about(void)
     pc_printf("             1    core instruction set (JIT-compatible)\n");
     pc_printf("             2    supplemental instruction set\n");
     pc_printf("             3    full instruction set (packed opcodes)\n");
-    pc_printf("         -p<name> set name of the \"prefix\" file\n");
+    pc_printf("         -p<name> set the \"prefix\" file; omit name to block default prefix file\n");
 #if !defined PAWN_LIGHT
     pc_printf("         -r[name] write cross reference report to console or to specified file\n");
 #endif

compiler/sc3.c

@@ -2104,6 +2104,11 @@ static int primary(value *lval,int *symtok)
   if (constant(lval)==0) {
     error(29);          /* expression error, assumed 0 */
     ldconst(0,sPRI);    /* load 0 */
+	/* Normally, gobble up unrecognized symbols, but make an exception for '}',
+	 *  because it closes compound statements.
+	 */
+    if (*symtok=='}')
+      lexpush();
   } /* if */
   return FALSE;         /* return 0 for constants (or errors) */
 }

test/issue45.p

@@ -0,0 +1,10 @@
+operator=(Tag:x)
+{
+	return _:x:
+}
+
+main()
+{
+	new a = Tag:5;
+	printf("%d", a);
+}