Merge pull request #128 from kio-watanabe/Fix-bug

Fix bug of printerrormsg
opensourcecobol · Sep 3, 2024 · 7010167 · 7010167
2 parents 4c43889 + 6aa0ecb
commit 7010167
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/ocesql/errorfile.c b/ocesql/errorfile.c
@@ -104,8 +104,6 @@ int printerrormsg(char *name, int line, char * code){
 	int ilen ;
 	char *p;
 
-	errmsgflg = 1;
-
 	if( code == NULL || line <=0 || name == NULL)
 		return 0;
 	ilen = sizeof(buff);
@@ -124,6 +122,8 @@ int printerrormsg(char *name, int line, char * code){
 	fputs(buff, pfile);
 	fputs("\n", pfile);
 
+	errmsgflg = 1;
+
 	return 1;
 }