Expect __pragma before the tag in function/variable declarations

Author: Daniel-Cortez

source/compiler/sc1.c

@@ -1993,6 +1993,9 @@ static void declfuncvar(int fpublic,int fstatic,int fstock,int fconst)
   cell val;
   int invalidfunc;
 
+  if (matchtoken(t__PRAGMA))
+    dopragma();
+
   tag=pc_addtag(NULL);
   tok=lex(&val,&str);
   /* if we arrived here, this may not be a declaration of a native function
@@ -2003,11 +2006,6 @@ static void declfuncvar(int fpublic,int fstatic,int fstock,int fconst)
     return;
   } /* if */
 
-  if (tok==t__PRAGMA) {
-    dopragma();
-    tok=lex(&val,&str);
-  } /* if */
-
   if (tok!=tSYMBOL && tok!=tOPERATOR) {
     lexpush();
     needtoken(tSYMBOL);