Merge SVN 3989

ddeclerck · Jun 11, 2024 · 5e11969 · 5e11969
1 parent b9387f4
commit 5e11969
Show file tree

Hide file tree

Showing 2 changed files with 2 additions and 1 deletion.
diff --git a/cobc/ChangeLog b/cobc/ChangeLog
@@ -1004,6 +1004,7 @@
 	  later on
 	* cobc.c (process_command_line), flag.def: -g now implies the recently
 	  added flags -fgen-c-line-directives and -fgen-c-labels
+	* codegen.c: output "cob_nop ();" instead of ";" for not-optimized "no op"
 
 2020-11-27  Ron Norman <[email protected]>
 

diff --git a/cobc/codegen.c b/cobc/codegen.c
@@ -8764,7 +8764,7 @@ output_line_and_trace_info (cb_tree x, const enum cob_statement stmnt)
 			output_line ("if ((module->flag_debug_trace & COB_MODULE_READYTRACE))");
 			output_line ("   cob_trace_statement (%s);", stmnt_enum);
 		} else if (cb_flag_c_line_directives) {
-			output_line (";");
+			output_line ("cob_nop ();");
 			output_c_info ();
 		}
 	} else {