fix a problem with debug statement line numbers for errors/warnings

Author: totalspectrum

Changelog.txt

@@ -1,6 +1,6 @@
 Version 7.0.4
-- Fixed lseek() return mismatch
 - Fixed an issue with casting to different size in nucode
+- Fixed incorrect line info in some DEBUG statements
 
 Version 7.0.3
 - Fixed .fpide search so file names are relative to the .fpide file

frontends/printdebug.c

@@ -142,6 +142,10 @@ CreatePrintfDebug(AST *exprlist, AST *dbgmask)
             return NULL;
         }
     }
+
+    ASTReportInfo save;
+    AstReportAs(exprlist, &save);
+    
     flexbuf_init(&fb, 1024);
 
     if (exprlist && exprlist->left && exprlist->left->kind == AST_LABEL) {   
@@ -186,5 +190,8 @@ CreatePrintfDebug(AST *exprlist, AST *dbgmask)
     outlist = AddToList(sub, outlist);
     printf_call = NewAST(AST_PRINT, NULL, NULL);
     printf_call = NewAST(AST_FUNCCALL, printf_call, outlist);
+
+    AstReportDone(&save);
+
     return genPrintf(printf_call);
 }