cobcd trashes source line information
sample run (after unpacking TESTER.tar.gz):
$> cobc -g TESTER.i
$> gdb --args cobcrun TESTER
Reading symbols from cobcrun...
(gdb) break TESTER_:ENTRY_TESTER
No source file named TESTER_.
Make breakpoint pending on future shared library load? (y or [n]) y
Breakpoint 1 (TESTER_:ENTRY_TESTER) pending.
(gdb) run
Starting program: /opt/gnucobol/bin/cobcrun TESTER
[Thread debugging using libthread_db enabled]
Using host libthread_db library "/usr/lib64/libthread_db.so.1".
Breakpoint 1, TESTER_ (entry=0) at TESTER.cob:117
117 PROCEDURE DIVISION.
(gdb) break SECTION_GOODY
Breakpoint 2 at 0x7fffe7925c47: file TESTER.cob, line 130.
(gdb) quit
A debugging session is active.
Inferior 1 [process 25662] will be killed.
Quit anyway? (y or n) y
$> cobcd -g TESTER.i
$> gdb --args cobcrun TESTER
Reading symbols from cobcrun...
(gdb) break TESTER_:ENTRY_TESTER
No source file named TESTER_.
Make breakpoint pending on future shared library load? (y or [n]) y
Breakpoint 1 (TESTER_:ENTRY_TESTER) pending.
(gdb) run
Starting program: /opt/gnucobol/bin/cobcrun TESTER
[Thread debugging using libthread_db enabled]
Using host libthread_db library "/usr/lib64/libthread_db.so.1".
Breakpoint 1, TESTER_ (entry=0) at TESTER.cob:118
118 GOGO SECTION.
(gdb) break SECTION_GOODY
Breakpoint 2 at 0x7fffe7925c2d: file /tmp/gnucobol-3.1.2/include/libcob/exception-io.def, line 130.
(gdb) quit
A debugging session is active.
Inferior 1 [process 26845] will be killed.
Quit anyway? (y or n) y
- 1st issue: the line reference for the entry changes from TESTER.cob:117 to TESTER.cob:118.
- 2nd issue: the file reference for the paragraph is in the wrong file, from TESTER.cob to /tmp/gnucobol-3.1.2/include/libcob/exception-io.def