Commit fd7076fd authored by rdubner's avatar rdubner

Debugging cob_nop version

parent 7452e9f5
......@@ -618,8 +618,8 @@ def Main() :
s = COB_CFLAGS_BASE + [FCF_PROTECTION];
os.environ["COB_CFLAGS"]= ' '.join(s)
os.environ["COBC_GEN_DUMP_COMMENTS"]= '1'
#S TRIPLE_X_COMMAND = DeSpace(COBC + " -### --save-temps -A -ggdb -fgen-c-line-directives -fgen-c-labels ") + COMMAND_LINE
TRIPLE_X_COMMAND = DeSpace(COBC + " -### --save-temps -fsource-location -A -ggdb -fgen-c-line-directives -fgen-c-labels ") + COMMAND_LINE
# TRIPLE_X_COMMAND = DeSpace(COBC + " -### --save-temps -fsource-location -A -ggdb -fgen-c-line-directives -fgen-c-labels ") + COMMAND_LINE
TRIPLE_X_COMMAND = DeSpace(COBC + " -### --save-temps -A -ggdb -fgen-c-line-directives -fgen-c-labels ") + COMMAND_LINE
try :
result_file = tempfile.TemporaryFile();
if ECHO :
......
......@@ -287,6 +287,17 @@ build(PARAMETERS &params,
while(fgets(ach,sizeof(ach),fd)) {
i += 1;
// Simon Sobisch, in order to facilitate file number mappings back to
// the program.cob text, has inserted cob_nop() calls before the
// beginning of the generated C for each COBOL statement.
//
// In return for his generosity, we strip them out here:
//
if( strstr(ach,"call\tcob_nop") ) {
continue;
}
// We have learned that the GDB trapping can get confused if there isn't
// a .loc reference in the first few lines after a function declaration.
......
......@@ -4,3 +4,8 @@ known-good.txt
under-test.txt
under-test.stripped
*.py
*.c
*.i
*.s
*.h
*.o
Markdown is supported
0%
or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment