Commit 6c208398 authored by rdubner's avatar rdubner

Release 4.9 Depends on GnuCOBOL 3.1.1 Just like 4.8, but with no -source-location switch

parent f4a1b306
......@@ -243,7 +243,7 @@ def Main() :
## The text "Version x.x" has to appear in square brackets. #
## Don't mess with it! #
###########################################################################
SCRIPT_VERSION="[Version 4.7]"
SCRIPT_VERSION="[Version 4.9]"
show_time = os.environ.get("SHOW_TIME","0")
SHOW_TIME = False
......@@ -334,7 +334,7 @@ def Main() :
COBST = SCRIPTDIR + "/cobcd-st/cobcd-st"
SFIX = SCRIPTDIR + "/cobcd-sfix/cobcd-sfix"
PYTHON = SCRIPTDIR + "/python/cobcd.py"
FMODE = COBCDFMODE or "2" # '2' because most development takes place on Ubuntu/Intel
FMODE = COBCDFMODE or "1" # '1' because most development takes place on Ubuntu/Intel, and we know it works
else :
# In normal operation, the executables are found in the same folder
# as the cobcd script
......@@ -636,8 +636,8 @@ def Main() :
s = COB_CFLAGS_BASE + [FCF_PROTECTION];
os.environ["COB_CFLAGS"]= ' '.join(s)
os.environ["COBC_GEN_DUMP_COMMENTS"]= '1'
# 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 :
......
......@@ -7,7 +7,7 @@ SETLOCAL ENABLEEXTENSIONS ENABLEDELAYEDEXPANSION
::## Don't mess with it! #
::###########################################################################
::
set VERSION=[Version 4.8]
set VERSION=[Version 4.9]
::
::
:: Stupendously useful:
......
......@@ -4,4 +4,4 @@
// On the Unix side, there is scripting trickery to propogate this version
// code into cobcd.py and the names of packages when they are created.
#define VERSION "4.8"
#define VERSION "4.9"
......@@ -2473,7 +2473,7 @@ class CPrint (gdb.Command) :
self.TabFile = TabFileInformation();
self.TabFile.question_mark_range = self.Worker.question_mark_range
print('Registering CPrint (Usage is "' + self.Worker.use_cprint + ' <COBOL identifier>") [Version 4.8]')
print('Registering CPrint (Usage is "' + self.Worker.use_cprint + ' <COBOL identifier>") [Version 4.9]')
super (CPrint, self).__init__ (self.Worker.use_cprint, gdb.COMMAND_USER)
def invoke (self, arguments, from_tty):
......
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