From 246a961055ecf3cb3f38858210c0204dd700c13d Mon Sep 17 00:00:00 2001 From: David Brown Date: Thu, 22 Sep 2016 15:03:08 +0100 Subject: [PATCH] Tidy OPM, update usage display. --- bootstrap/unix-44/Configuration.c | 4 +- bootstrap/unix-44/Configuration.h | 2 +- bootstrap/unix-44/Console.c | 2 +- bootstrap/unix-44/Console.h | 2 +- bootstrap/unix-44/Files.c | 2 +- bootstrap/unix-44/Files.h | 2 +- bootstrap/unix-44/Heap.c | 2 +- bootstrap/unix-44/Heap.h | 2 +- bootstrap/unix-44/Modules.c | 2 +- bootstrap/unix-44/Modules.h | 2 +- bootstrap/unix-44/OPB.c | 2 +- bootstrap/unix-44/OPB.h | 2 +- bootstrap/unix-44/OPC.c | 2 +- bootstrap/unix-44/OPC.h | 2 +- bootstrap/unix-44/OPM.c | 28 +++++----- bootstrap/unix-44/OPM.h | 2 +- bootstrap/unix-44/OPP.c | 2 +- bootstrap/unix-44/OPP.h | 2 +- bootstrap/unix-44/OPS.c | 2 +- bootstrap/unix-44/OPS.h | 2 +- bootstrap/unix-44/OPT.c | 2 +- bootstrap/unix-44/OPT.h | 2 +- bootstrap/unix-44/OPV.c | 2 +- bootstrap/unix-44/OPV.h | 2 +- bootstrap/unix-44/Platform.c | 2 +- bootstrap/unix-44/Platform.h | 2 +- bootstrap/unix-44/Reals.c | 2 +- bootstrap/unix-44/Reals.h | 2 +- bootstrap/unix-44/Strings.c | 2 +- bootstrap/unix-44/Strings.h | 2 +- bootstrap/unix-44/Texts.c | 2 +- bootstrap/unix-44/Texts.h | 2 +- bootstrap/unix-44/Vishap.c | 2 +- bootstrap/unix-44/errors.c | 2 +- bootstrap/unix-44/errors.h | 2 +- bootstrap/unix-44/extTools.c | 2 +- bootstrap/unix-44/extTools.h | 2 +- bootstrap/unix-44/vt100.c | 2 +- bootstrap/unix-44/vt100.h | 2 +- bootstrap/unix-48/Configuration.c | 4 +- bootstrap/unix-48/Configuration.h | 2 +- bootstrap/unix-48/Console.c | 2 +- bootstrap/unix-48/Console.h | 2 +- bootstrap/unix-48/Files.c | 2 +- bootstrap/unix-48/Files.h | 2 +- bootstrap/unix-48/Heap.c | 2 +- bootstrap/unix-48/Heap.h | 2 +- bootstrap/unix-48/Modules.c | 2 +- bootstrap/unix-48/Modules.h | 2 +- bootstrap/unix-48/OPB.c | 2 +- bootstrap/unix-48/OPB.h | 2 +- bootstrap/unix-48/OPC.c | 2 +- bootstrap/unix-48/OPC.h | 2 +- bootstrap/unix-48/OPM.c | 28 +++++----- bootstrap/unix-48/OPM.h | 2 +- bootstrap/unix-48/OPP.c | 2 +- bootstrap/unix-48/OPP.h | 2 +- bootstrap/unix-48/OPS.c | 2 +- bootstrap/unix-48/OPS.h | 2 +- bootstrap/unix-48/OPT.c | 2 +- bootstrap/unix-48/OPT.h | 2 +- bootstrap/unix-48/OPV.c | 2 +- bootstrap/unix-48/OPV.h | 2 +- bootstrap/unix-48/Platform.c | 2 +- bootstrap/unix-48/Platform.h | 2 +- bootstrap/unix-48/Reals.c | 2 +- bootstrap/unix-48/Reals.h | 2 +- bootstrap/unix-48/Strings.c | 2 +- bootstrap/unix-48/Strings.h | 2 +- bootstrap/unix-48/Texts.c | 2 +- bootstrap/unix-48/Texts.h | 2 +- bootstrap/unix-48/Vishap.c | 2 +- bootstrap/unix-48/errors.c | 2 +- bootstrap/unix-48/errors.h | 2 +- bootstrap/unix-48/extTools.c | 2 +- bootstrap/unix-48/extTools.h | 2 +- bootstrap/unix-48/vt100.c | 2 +- bootstrap/unix-48/vt100.h | 2 +- bootstrap/unix-88/Configuration.c | 4 +- bootstrap/unix-88/Configuration.h | 2 +- bootstrap/unix-88/Console.c | 2 +- bootstrap/unix-88/Console.h | 2 +- bootstrap/unix-88/Files.c | 2 +- bootstrap/unix-88/Files.h | 2 +- bootstrap/unix-88/Heap.c | 2 +- bootstrap/unix-88/Heap.h | 2 +- bootstrap/unix-88/Modules.c | 2 +- bootstrap/unix-88/Modules.h | 2 +- bootstrap/unix-88/OPB.c | 2 +- bootstrap/unix-88/OPB.h | 2 +- bootstrap/unix-88/OPC.c | 2 +- bootstrap/unix-88/OPC.h | 2 +- bootstrap/unix-88/OPM.c | 28 +++++----- bootstrap/unix-88/OPM.h | 2 +- bootstrap/unix-88/OPP.c | 2 +- bootstrap/unix-88/OPP.h | 2 +- bootstrap/unix-88/OPS.c | 2 +- bootstrap/unix-88/OPS.h | 2 +- bootstrap/unix-88/OPT.c | 2 +- bootstrap/unix-88/OPT.h | 2 +- bootstrap/unix-88/OPV.c | 2 +- bootstrap/unix-88/OPV.h | 2 +- bootstrap/unix-88/Platform.c | 2 +- bootstrap/unix-88/Platform.h | 2 +- bootstrap/unix-88/Reals.c | 2 +- bootstrap/unix-88/Reals.h | 2 +- bootstrap/unix-88/Strings.c | 2 +- bootstrap/unix-88/Strings.h | 2 +- bootstrap/unix-88/Texts.c | 2 +- bootstrap/unix-88/Texts.h | 2 +- bootstrap/unix-88/Vishap.c | 2 +- bootstrap/unix-88/errors.c | 2 +- bootstrap/unix-88/errors.h | 2 +- bootstrap/unix-88/extTools.c | 2 +- bootstrap/unix-88/extTools.h | 2 +- bootstrap/unix-88/vt100.c | 2 +- bootstrap/unix-88/vt100.h | 2 +- bootstrap/windows-48/Configuration.c | 4 +- bootstrap/windows-48/Configuration.h | 2 +- bootstrap/windows-48/Console.c | 2 +- bootstrap/windows-48/Console.h | 2 +- bootstrap/windows-48/Files.c | 2 +- bootstrap/windows-48/Files.h | 2 +- bootstrap/windows-48/Heap.c | 2 +- bootstrap/windows-48/Heap.h | 2 +- bootstrap/windows-48/Modules.c | 2 +- bootstrap/windows-48/Modules.h | 2 +- bootstrap/windows-48/OPB.c | 2 +- bootstrap/windows-48/OPB.h | 2 +- bootstrap/windows-48/OPC.c | 2 +- bootstrap/windows-48/OPC.h | 2 +- bootstrap/windows-48/OPM.c | 28 +++++----- bootstrap/windows-48/OPM.h | 2 +- bootstrap/windows-48/OPP.c | 2 +- bootstrap/windows-48/OPP.h | 2 +- bootstrap/windows-48/OPS.c | 2 +- bootstrap/windows-48/OPS.h | 2 +- bootstrap/windows-48/OPT.c | 2 +- bootstrap/windows-48/OPT.h | 2 +- bootstrap/windows-48/OPV.c | 2 +- bootstrap/windows-48/OPV.h | 2 +- bootstrap/windows-48/Platform.c | 2 +- bootstrap/windows-48/Platform.h | 2 +- bootstrap/windows-48/Reals.c | 2 +- bootstrap/windows-48/Reals.h | 2 +- bootstrap/windows-48/Strings.c | 2 +- bootstrap/windows-48/Strings.h | 2 +- bootstrap/windows-48/Texts.c | 2 +- bootstrap/windows-48/Texts.h | 2 +- bootstrap/windows-48/Vishap.c | 2 +- bootstrap/windows-48/errors.c | 2 +- bootstrap/windows-48/errors.h | 2 +- bootstrap/windows-48/extTools.c | 2 +- bootstrap/windows-48/extTools.h | 2 +- bootstrap/windows-48/vt100.c | 2 +- bootstrap/windows-48/vt100.h | 2 +- bootstrap/windows-88/Configuration.c | 4 +- bootstrap/windows-88/Configuration.h | 2 +- bootstrap/windows-88/Console.c | 2 +- bootstrap/windows-88/Console.h | 2 +- bootstrap/windows-88/Files.c | 2 +- bootstrap/windows-88/Files.h | 2 +- bootstrap/windows-88/Heap.c | 2 +- bootstrap/windows-88/Heap.h | 2 +- bootstrap/windows-88/Modules.c | 2 +- bootstrap/windows-88/Modules.h | 2 +- bootstrap/windows-88/OPB.c | 2 +- bootstrap/windows-88/OPB.h | 2 +- bootstrap/windows-88/OPC.c | 2 +- bootstrap/windows-88/OPC.h | 2 +- bootstrap/windows-88/OPM.c | 28 +++++----- bootstrap/windows-88/OPM.h | 2 +- bootstrap/windows-88/OPP.c | 2 +- bootstrap/windows-88/OPP.h | 2 +- bootstrap/windows-88/OPS.c | 2 +- bootstrap/windows-88/OPS.h | 2 +- bootstrap/windows-88/OPT.c | 2 +- bootstrap/windows-88/OPT.h | 2 +- bootstrap/windows-88/OPV.c | 2 +- bootstrap/windows-88/OPV.h | 2 +- bootstrap/windows-88/Platform.c | 2 +- bootstrap/windows-88/Platform.h | 2 +- bootstrap/windows-88/Reals.c | 2 +- bootstrap/windows-88/Reals.h | 2 +- bootstrap/windows-88/Strings.c | 2 +- bootstrap/windows-88/Strings.h | 2 +- bootstrap/windows-88/Texts.c | 2 +- bootstrap/windows-88/Texts.h | 2 +- bootstrap/windows-88/Vishap.c | 2 +- bootstrap/windows-88/errors.c | 2 +- bootstrap/windows-88/errors.h | 2 +- bootstrap/windows-88/extTools.c | 2 +- bootstrap/windows-88/extTools.h | 2 +- bootstrap/windows-88/vt100.c | 2 +- bootstrap/windows-88/vt100.h | 2 +- src/compiler/OPM.cmdln.Mod | 79 ++++++++++++---------------- 196 files changed, 310 insertions(+), 299 deletions(-) diff --git a/bootstrap/unix-44/Configuration.c b/bootstrap/unix-44/Configuration.c index c780cc96..b17dc344 100644 --- a/bootstrap/unix-44/Configuration.c +++ b/bootstrap/unix-44/Configuration.c @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #define INTEGER int16 #define LONGINT int32 @@ -18,6 +18,6 @@ export void *Configuration__init(void) __DEFMOD; __REGMOD("Configuration", 0); /* BEGIN */ - __MOVE("1.95 [2016/09/21] for gcc LP64 on cygwin", Configuration_versionLong, 41); + __MOVE("1.95 [2016/09/22] for gcc LP64 on cygwin", Configuration_versionLong, 41); __ENDMOD; } diff --git a/bootstrap/unix-44/Configuration.h b/bootstrap/unix-44/Configuration.h index 7fdf5f78..dca477a6 100644 --- a/bootstrap/unix-44/Configuration.h +++ b/bootstrap/unix-44/Configuration.h @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #ifndef Configuration__h #define Configuration__h diff --git a/bootstrap/unix-44/Console.c b/bootstrap/unix-44/Console.c index eaa862b2..f330b900 100644 --- a/bootstrap/unix-44/Console.c +++ b/bootstrap/unix-44/Console.c @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #define INTEGER int16 #define LONGINT int32 diff --git a/bootstrap/unix-44/Console.h b/bootstrap/unix-44/Console.h index c8de3606..6837ab77 100644 --- a/bootstrap/unix-44/Console.h +++ b/bootstrap/unix-44/Console.h @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #ifndef Console__h #define Console__h diff --git a/bootstrap/unix-44/Files.c b/bootstrap/unix-44/Files.c index 6e15e6b7..22fabbc7 100644 --- a/bootstrap/unix-44/Files.c +++ b/bootstrap/unix-44/Files.c @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin tspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin tspaSfF */ #define INTEGER int16 #define LONGINT int32 diff --git a/bootstrap/unix-44/Files.h b/bootstrap/unix-44/Files.h index 960fca06..4fd2efd8 100644 --- a/bootstrap/unix-44/Files.h +++ b/bootstrap/unix-44/Files.h @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin tspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin tspaSfF */ #ifndef Files__h #define Files__h diff --git a/bootstrap/unix-44/Heap.c b/bootstrap/unix-44/Heap.c index 50823221..17784d67 100644 --- a/bootstrap/unix-44/Heap.c +++ b/bootstrap/unix-44/Heap.c @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin tsSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin tsSfF */ #define INTEGER int16 #define LONGINT int32 diff --git a/bootstrap/unix-44/Heap.h b/bootstrap/unix-44/Heap.h index 57904466..b1c745df 100644 --- a/bootstrap/unix-44/Heap.h +++ b/bootstrap/unix-44/Heap.h @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin tsSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin tsSfF */ #ifndef Heap__h #define Heap__h diff --git a/bootstrap/unix-44/Modules.c b/bootstrap/unix-44/Modules.c index 1c66c8e5..1564f5e0 100644 --- a/bootstrap/unix-44/Modules.c +++ b/bootstrap/unix-44/Modules.c @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #define INTEGER int16 #define LONGINT int32 diff --git a/bootstrap/unix-44/Modules.h b/bootstrap/unix-44/Modules.h index 13b6dbed..dbc243c8 100644 --- a/bootstrap/unix-44/Modules.h +++ b/bootstrap/unix-44/Modules.h @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #ifndef Modules__h #define Modules__h diff --git a/bootstrap/unix-44/OPB.c b/bootstrap/unix-44/OPB.c index c9ebd8f5..99ca6ea0 100644 --- a/bootstrap/unix-44/OPB.c +++ b/bootstrap/unix-44/OPB.c @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #define INTEGER int16 #define LONGINT int32 diff --git a/bootstrap/unix-44/OPB.h b/bootstrap/unix-44/OPB.h index cdd33f1b..434172a2 100644 --- a/bootstrap/unix-44/OPB.h +++ b/bootstrap/unix-44/OPB.h @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #ifndef OPB__h #define OPB__h diff --git a/bootstrap/unix-44/OPC.c b/bootstrap/unix-44/OPC.c index 6b7d1b01..11f64b59 100644 --- a/bootstrap/unix-44/OPC.c +++ b/bootstrap/unix-44/OPC.c @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #define INTEGER int16 #define LONGINT int32 diff --git a/bootstrap/unix-44/OPC.h b/bootstrap/unix-44/OPC.h index b398282e..09952648 100644 --- a/bootstrap/unix-44/OPC.h +++ b/bootstrap/unix-44/OPC.h @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #ifndef OPC__h #define OPC__h diff --git a/bootstrap/unix-44/OPM.c b/bootstrap/unix-44/OPM.c index 0086ff0f..2122bed9 100644 --- a/bootstrap/unix-44/OPM.c +++ b/bootstrap/unix-44/OPM.c @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #define INTEGER int16 #define LONGINT int32 @@ -269,11 +269,13 @@ BOOLEAN OPM_OpenPar (void) CHAR s[256]; if (Platform_ArgCount == 1) { OPM_LogWLn(); - OPM_LogWStr((CHAR*)"Vishap Oberon-2 compiler v", 27); + OPM_LogWStr((CHAR*)"Oberon-2 compiler v", 20); OPM_LogWStr(Configuration_versionLong, 41); OPM_LogW('.'); OPM_LogWLn(); - OPM_LogWStr((CHAR*)"Based on Ofront by Software Templ OEG, continued by Norayr Chilingarian and others.", 84); + OPM_LogWStr((CHAR*)"Based on Ofront by Software Templ OEG.", 39); + OPM_LogWLn(); + OPM_LogWStr((CHAR*)"Further development by Norayr Chilingarian, David Brown and others.", 68); OPM_LogWLn(); OPM_LogWLn(); OPM_LogWStr((CHAR*)"Usage:", 7); @@ -289,15 +291,15 @@ BOOLEAN OPM_OpenPar (void) OPM_LogWLn(); OPM_LogWStr((CHAR*)" Run time safety", 18); OPM_LogWLn(); - OPM_LogWStr((CHAR*)" -p Initialise pointers to NIL.", 37); + OPM_LogWStr((CHAR*)" -p Initialise pointers to NIL. On by default.", 52); OPM_LogWLn(); - OPM_LogWStr((CHAR*)" -a Halt on assertion failures.", 37); + OPM_LogWStr((CHAR*)" -a Halt on assertion failures. On by default.", 52); OPM_LogWLn(); OPM_LogWStr((CHAR*)" -r Halt on range check failures.", 39); OPM_LogWLn(); - OPM_LogWStr((CHAR*)" -t Halt on type guad failure.", 36); + OPM_LogWStr((CHAR*)" -t Halt on type guard failure. On by default.", 52); OPM_LogWLn(); - OPM_LogWStr((CHAR*)" -x Halt on index out of range.", 37); + OPM_LogWStr((CHAR*)" -x Halt on index out of range. On by default.", 52); OPM_LogWLn(); OPM_LogWLn(); OPM_LogWStr((CHAR*)" Symbol file management", 25); @@ -327,16 +329,16 @@ BOOLEAN OPM_OpenPar (void) OPM_LogWStr((CHAR*)" -V Display compiler debugging messages.", 46); OPM_LogWLn(); OPM_LogWLn(); - OPM_LogWStr((CHAR*)" Size model for elementary types", 34); + OPM_LogWStr((CHAR*)" Size model for elementary types (default O2 on 32 bit builds, OV on 64 bits)", 79); OPM_LogWLn(); - OPM_LogWStr((CHAR*)" -O2 Original Oberon / Oberon-2: 8 bit SHORTINT, 16 bit INTEGER, 32 bit LONGINT and SET.", 94); + OPM_LogWStr((CHAR*)" -O2 Original Oberon / Oberon-2: 8 bit SHORTINT, 16 bit INTEGER, 32 bit LONGINT and SET.", 95); OPM_LogWLn(); - OPM_LogWStr((CHAR*)" -OC Component Pascal: 16 bit SHORTINT, 32 bit INTEGER, 64 bit LONGINT and SET.", 94); + OPM_LogWStr((CHAR*)" -OC Component Pascal: 16 bit SHORTINT, 32 bit INTEGER, 64 bit LONGINT and SET.", 95); OPM_LogWLn(); - OPM_LogWStr((CHAR*)" -OV Alternate large model: 8 bit SHORTINT, 32 bit INTEGER, 64 bit LONGINT and SET.", 94); + OPM_LogWStr((CHAR*)" -OV Alternate large model: 8 bit SHORTINT, 32 bit INTEGER, 64 bit LONGINT and SET.", 95); OPM_LogWLn(); OPM_LogWLn(); - OPM_LogWStr((CHAR*)" Target machine address size and alignment", 44); + OPM_LogWStr((CHAR*)" Target machine address size and alignment (default is that of the running compiler binary)", 93); OPM_LogWLn(); OPM_LogWStr((CHAR*)" -A44 32 bit addresses, 32 bit alignment (e.g. Unix/linux 32 bit on x86).", 79); OPM_LogWLn(); @@ -345,6 +347,8 @@ BOOLEAN OPM_OpenPar (void) OPM_LogWStr((CHAR*)" -A88 66 bit addresses, 64 bit alignment (e.g. 64 bit platforms).", 71); OPM_LogWLn(); OPM_LogWLn(); + OPM_LogWStr((CHAR*)"All options are off by default, except where noted above.", 58); + OPM_LogWLn(); OPM_LogWStr((CHAR*)"Initial options specify defaults for all files.", 48); OPM_LogWLn(); OPM_LogWStr((CHAR*)"Options following a filename are specific to that file.", 56); diff --git a/bootstrap/unix-44/OPM.h b/bootstrap/unix-44/OPM.h index b32da345..8ca21351 100644 --- a/bootstrap/unix-44/OPM.h +++ b/bootstrap/unix-44/OPM.h @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #ifndef OPM__h #define OPM__h diff --git a/bootstrap/unix-44/OPP.c b/bootstrap/unix-44/OPP.c index af0d37db..d2b3e83f 100644 --- a/bootstrap/unix-44/OPP.c +++ b/bootstrap/unix-44/OPP.c @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #define INTEGER int16 #define LONGINT int32 diff --git a/bootstrap/unix-44/OPP.h b/bootstrap/unix-44/OPP.h index 6dd03161..28045a86 100644 --- a/bootstrap/unix-44/OPP.h +++ b/bootstrap/unix-44/OPP.h @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #ifndef OPP__h #define OPP__h diff --git a/bootstrap/unix-44/OPS.c b/bootstrap/unix-44/OPS.c index f37bbc27..99aba006 100644 --- a/bootstrap/unix-44/OPS.c +++ b/bootstrap/unix-44/OPS.c @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin tspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin tspaSfF */ #define INTEGER int16 #define LONGINT int32 diff --git a/bootstrap/unix-44/OPS.h b/bootstrap/unix-44/OPS.h index 1b60944c..f7dd1d10 100644 --- a/bootstrap/unix-44/OPS.h +++ b/bootstrap/unix-44/OPS.h @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin tspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin tspaSfF */ #ifndef OPS__h #define OPS__h diff --git a/bootstrap/unix-44/OPT.c b/bootstrap/unix-44/OPT.c index 147fdc5c..bd7bde13 100644 --- a/bootstrap/unix-44/OPT.c +++ b/bootstrap/unix-44/OPT.c @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #define INTEGER int16 #define LONGINT int32 diff --git a/bootstrap/unix-44/OPT.h b/bootstrap/unix-44/OPT.h index d999d4ec..5de02c8b 100644 --- a/bootstrap/unix-44/OPT.h +++ b/bootstrap/unix-44/OPT.h @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #ifndef OPT__h #define OPT__h diff --git a/bootstrap/unix-44/OPV.c b/bootstrap/unix-44/OPV.c index edb84f81..efddd202 100644 --- a/bootstrap/unix-44/OPV.c +++ b/bootstrap/unix-44/OPV.c @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #define INTEGER int16 #define LONGINT int32 diff --git a/bootstrap/unix-44/OPV.h b/bootstrap/unix-44/OPV.h index a89aa61a..4a3f9d07 100644 --- a/bootstrap/unix-44/OPV.h +++ b/bootstrap/unix-44/OPV.h @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #ifndef OPV__h #define OPV__h diff --git a/bootstrap/unix-44/Platform.c b/bootstrap/unix-44/Platform.c index 2f652641..2bb80b77 100644 --- a/bootstrap/unix-44/Platform.c +++ b/bootstrap/unix-44/Platform.c @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #define INTEGER int16 #define LONGINT int32 diff --git a/bootstrap/unix-44/Platform.h b/bootstrap/unix-44/Platform.h index adbbe116..2b954508 100644 --- a/bootstrap/unix-44/Platform.h +++ b/bootstrap/unix-44/Platform.h @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #ifndef Platform__h #define Platform__h diff --git a/bootstrap/unix-44/Reals.c b/bootstrap/unix-44/Reals.c index dec0e0b4..c1ffff0a 100644 --- a/bootstrap/unix-44/Reals.c +++ b/bootstrap/unix-44/Reals.c @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #define INTEGER int16 #define LONGINT int32 diff --git a/bootstrap/unix-44/Reals.h b/bootstrap/unix-44/Reals.h index 0b779857..0ccc7989 100644 --- a/bootstrap/unix-44/Reals.h +++ b/bootstrap/unix-44/Reals.h @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #ifndef Reals__h #define Reals__h diff --git a/bootstrap/unix-44/Strings.c b/bootstrap/unix-44/Strings.c index 69612295..0f221fe7 100644 --- a/bootstrap/unix-44/Strings.c +++ b/bootstrap/unix-44/Strings.c @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #define INTEGER int16 #define LONGINT int32 diff --git a/bootstrap/unix-44/Strings.h b/bootstrap/unix-44/Strings.h index b4d5f201..9fdb55fb 100644 --- a/bootstrap/unix-44/Strings.h +++ b/bootstrap/unix-44/Strings.h @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #ifndef Strings__h #define Strings__h diff --git a/bootstrap/unix-44/Texts.c b/bootstrap/unix-44/Texts.c index df1eacae..b29595be 100644 --- a/bootstrap/unix-44/Texts.c +++ b/bootstrap/unix-44/Texts.c @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #define INTEGER int16 #define LONGINT int32 diff --git a/bootstrap/unix-44/Texts.h b/bootstrap/unix-44/Texts.h index 1702769b..59498ab9 100644 --- a/bootstrap/unix-44/Texts.h +++ b/bootstrap/unix-44/Texts.h @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #ifndef Texts__h #define Texts__h diff --git a/bootstrap/unix-44/Vishap.c b/bootstrap/unix-44/Vishap.c index 17b498b8..7b2dcd23 100644 --- a/bootstrap/unix-44/Vishap.c +++ b/bootstrap/unix-44/Vishap.c @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspamSf */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspamSf */ #define INTEGER int16 #define LONGINT int32 diff --git a/bootstrap/unix-44/errors.c b/bootstrap/unix-44/errors.c index 95868540..3a4b1ce7 100644 --- a/bootstrap/unix-44/errors.c +++ b/bootstrap/unix-44/errors.c @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #define INTEGER int16 #define LONGINT int32 diff --git a/bootstrap/unix-44/errors.h b/bootstrap/unix-44/errors.h index d574008d..6ca6c961 100644 --- a/bootstrap/unix-44/errors.h +++ b/bootstrap/unix-44/errors.h @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #ifndef errors__h #define errors__h diff --git a/bootstrap/unix-44/extTools.c b/bootstrap/unix-44/extTools.c index 9047ebcc..2167c7f8 100644 --- a/bootstrap/unix-44/extTools.c +++ b/bootstrap/unix-44/extTools.c @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #define INTEGER int16 #define LONGINT int32 diff --git a/bootstrap/unix-44/extTools.h b/bootstrap/unix-44/extTools.h index 847e440e..0b905427 100644 --- a/bootstrap/unix-44/extTools.h +++ b/bootstrap/unix-44/extTools.h @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #ifndef extTools__h #define extTools__h diff --git a/bootstrap/unix-44/vt100.c b/bootstrap/unix-44/vt100.c index a14f3ee0..c337a9e2 100644 --- a/bootstrap/unix-44/vt100.c +++ b/bootstrap/unix-44/vt100.c @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #define INTEGER int16 #define LONGINT int32 diff --git a/bootstrap/unix-44/vt100.h b/bootstrap/unix-44/vt100.h index 1402af8c..2428fce4 100644 --- a/bootstrap/unix-44/vt100.h +++ b/bootstrap/unix-44/vt100.h @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #ifndef vt100__h #define vt100__h diff --git a/bootstrap/unix-48/Configuration.c b/bootstrap/unix-48/Configuration.c index c780cc96..b17dc344 100644 --- a/bootstrap/unix-48/Configuration.c +++ b/bootstrap/unix-48/Configuration.c @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #define INTEGER int16 #define LONGINT int32 @@ -18,6 +18,6 @@ export void *Configuration__init(void) __DEFMOD; __REGMOD("Configuration", 0); /* BEGIN */ - __MOVE("1.95 [2016/09/21] for gcc LP64 on cygwin", Configuration_versionLong, 41); + __MOVE("1.95 [2016/09/22] for gcc LP64 on cygwin", Configuration_versionLong, 41); __ENDMOD; } diff --git a/bootstrap/unix-48/Configuration.h b/bootstrap/unix-48/Configuration.h index 7fdf5f78..dca477a6 100644 --- a/bootstrap/unix-48/Configuration.h +++ b/bootstrap/unix-48/Configuration.h @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #ifndef Configuration__h #define Configuration__h diff --git a/bootstrap/unix-48/Console.c b/bootstrap/unix-48/Console.c index eaa862b2..f330b900 100644 --- a/bootstrap/unix-48/Console.c +++ b/bootstrap/unix-48/Console.c @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #define INTEGER int16 #define LONGINT int32 diff --git a/bootstrap/unix-48/Console.h b/bootstrap/unix-48/Console.h index c8de3606..6837ab77 100644 --- a/bootstrap/unix-48/Console.h +++ b/bootstrap/unix-48/Console.h @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #ifndef Console__h #define Console__h diff --git a/bootstrap/unix-48/Files.c b/bootstrap/unix-48/Files.c index 6e15e6b7..22fabbc7 100644 --- a/bootstrap/unix-48/Files.c +++ b/bootstrap/unix-48/Files.c @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin tspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin tspaSfF */ #define INTEGER int16 #define LONGINT int32 diff --git a/bootstrap/unix-48/Files.h b/bootstrap/unix-48/Files.h index 960fca06..4fd2efd8 100644 --- a/bootstrap/unix-48/Files.h +++ b/bootstrap/unix-48/Files.h @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin tspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin tspaSfF */ #ifndef Files__h #define Files__h diff --git a/bootstrap/unix-48/Heap.c b/bootstrap/unix-48/Heap.c index 50823221..17784d67 100644 --- a/bootstrap/unix-48/Heap.c +++ b/bootstrap/unix-48/Heap.c @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin tsSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin tsSfF */ #define INTEGER int16 #define LONGINT int32 diff --git a/bootstrap/unix-48/Heap.h b/bootstrap/unix-48/Heap.h index 57904466..b1c745df 100644 --- a/bootstrap/unix-48/Heap.h +++ b/bootstrap/unix-48/Heap.h @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin tsSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin tsSfF */ #ifndef Heap__h #define Heap__h diff --git a/bootstrap/unix-48/Modules.c b/bootstrap/unix-48/Modules.c index 1c66c8e5..1564f5e0 100644 --- a/bootstrap/unix-48/Modules.c +++ b/bootstrap/unix-48/Modules.c @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #define INTEGER int16 #define LONGINT int32 diff --git a/bootstrap/unix-48/Modules.h b/bootstrap/unix-48/Modules.h index 13b6dbed..dbc243c8 100644 --- a/bootstrap/unix-48/Modules.h +++ b/bootstrap/unix-48/Modules.h @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #ifndef Modules__h #define Modules__h diff --git a/bootstrap/unix-48/OPB.c b/bootstrap/unix-48/OPB.c index c9ebd8f5..99ca6ea0 100644 --- a/bootstrap/unix-48/OPB.c +++ b/bootstrap/unix-48/OPB.c @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #define INTEGER int16 #define LONGINT int32 diff --git a/bootstrap/unix-48/OPB.h b/bootstrap/unix-48/OPB.h index cdd33f1b..434172a2 100644 --- a/bootstrap/unix-48/OPB.h +++ b/bootstrap/unix-48/OPB.h @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #ifndef OPB__h #define OPB__h diff --git a/bootstrap/unix-48/OPC.c b/bootstrap/unix-48/OPC.c index 6b7d1b01..11f64b59 100644 --- a/bootstrap/unix-48/OPC.c +++ b/bootstrap/unix-48/OPC.c @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #define INTEGER int16 #define LONGINT int32 diff --git a/bootstrap/unix-48/OPC.h b/bootstrap/unix-48/OPC.h index b398282e..09952648 100644 --- a/bootstrap/unix-48/OPC.h +++ b/bootstrap/unix-48/OPC.h @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #ifndef OPC__h #define OPC__h diff --git a/bootstrap/unix-48/OPM.c b/bootstrap/unix-48/OPM.c index 0086ff0f..2122bed9 100644 --- a/bootstrap/unix-48/OPM.c +++ b/bootstrap/unix-48/OPM.c @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #define INTEGER int16 #define LONGINT int32 @@ -269,11 +269,13 @@ BOOLEAN OPM_OpenPar (void) CHAR s[256]; if (Platform_ArgCount == 1) { OPM_LogWLn(); - OPM_LogWStr((CHAR*)"Vishap Oberon-2 compiler v", 27); + OPM_LogWStr((CHAR*)"Oberon-2 compiler v", 20); OPM_LogWStr(Configuration_versionLong, 41); OPM_LogW('.'); OPM_LogWLn(); - OPM_LogWStr((CHAR*)"Based on Ofront by Software Templ OEG, continued by Norayr Chilingarian and others.", 84); + OPM_LogWStr((CHAR*)"Based on Ofront by Software Templ OEG.", 39); + OPM_LogWLn(); + OPM_LogWStr((CHAR*)"Further development by Norayr Chilingarian, David Brown and others.", 68); OPM_LogWLn(); OPM_LogWLn(); OPM_LogWStr((CHAR*)"Usage:", 7); @@ -289,15 +291,15 @@ BOOLEAN OPM_OpenPar (void) OPM_LogWLn(); OPM_LogWStr((CHAR*)" Run time safety", 18); OPM_LogWLn(); - OPM_LogWStr((CHAR*)" -p Initialise pointers to NIL.", 37); + OPM_LogWStr((CHAR*)" -p Initialise pointers to NIL. On by default.", 52); OPM_LogWLn(); - OPM_LogWStr((CHAR*)" -a Halt on assertion failures.", 37); + OPM_LogWStr((CHAR*)" -a Halt on assertion failures. On by default.", 52); OPM_LogWLn(); OPM_LogWStr((CHAR*)" -r Halt on range check failures.", 39); OPM_LogWLn(); - OPM_LogWStr((CHAR*)" -t Halt on type guad failure.", 36); + OPM_LogWStr((CHAR*)" -t Halt on type guard failure. On by default.", 52); OPM_LogWLn(); - OPM_LogWStr((CHAR*)" -x Halt on index out of range.", 37); + OPM_LogWStr((CHAR*)" -x Halt on index out of range. On by default.", 52); OPM_LogWLn(); OPM_LogWLn(); OPM_LogWStr((CHAR*)" Symbol file management", 25); @@ -327,16 +329,16 @@ BOOLEAN OPM_OpenPar (void) OPM_LogWStr((CHAR*)" -V Display compiler debugging messages.", 46); OPM_LogWLn(); OPM_LogWLn(); - OPM_LogWStr((CHAR*)" Size model for elementary types", 34); + OPM_LogWStr((CHAR*)" Size model for elementary types (default O2 on 32 bit builds, OV on 64 bits)", 79); OPM_LogWLn(); - OPM_LogWStr((CHAR*)" -O2 Original Oberon / Oberon-2: 8 bit SHORTINT, 16 bit INTEGER, 32 bit LONGINT and SET.", 94); + OPM_LogWStr((CHAR*)" -O2 Original Oberon / Oberon-2: 8 bit SHORTINT, 16 bit INTEGER, 32 bit LONGINT and SET.", 95); OPM_LogWLn(); - OPM_LogWStr((CHAR*)" -OC Component Pascal: 16 bit SHORTINT, 32 bit INTEGER, 64 bit LONGINT and SET.", 94); + OPM_LogWStr((CHAR*)" -OC Component Pascal: 16 bit SHORTINT, 32 bit INTEGER, 64 bit LONGINT and SET.", 95); OPM_LogWLn(); - OPM_LogWStr((CHAR*)" -OV Alternate large model: 8 bit SHORTINT, 32 bit INTEGER, 64 bit LONGINT and SET.", 94); + OPM_LogWStr((CHAR*)" -OV Alternate large model: 8 bit SHORTINT, 32 bit INTEGER, 64 bit LONGINT and SET.", 95); OPM_LogWLn(); OPM_LogWLn(); - OPM_LogWStr((CHAR*)" Target machine address size and alignment", 44); + OPM_LogWStr((CHAR*)" Target machine address size and alignment (default is that of the running compiler binary)", 93); OPM_LogWLn(); OPM_LogWStr((CHAR*)" -A44 32 bit addresses, 32 bit alignment (e.g. Unix/linux 32 bit on x86).", 79); OPM_LogWLn(); @@ -345,6 +347,8 @@ BOOLEAN OPM_OpenPar (void) OPM_LogWStr((CHAR*)" -A88 66 bit addresses, 64 bit alignment (e.g. 64 bit platforms).", 71); OPM_LogWLn(); OPM_LogWLn(); + OPM_LogWStr((CHAR*)"All options are off by default, except where noted above.", 58); + OPM_LogWLn(); OPM_LogWStr((CHAR*)"Initial options specify defaults for all files.", 48); OPM_LogWLn(); OPM_LogWStr((CHAR*)"Options following a filename are specific to that file.", 56); diff --git a/bootstrap/unix-48/OPM.h b/bootstrap/unix-48/OPM.h index b32da345..8ca21351 100644 --- a/bootstrap/unix-48/OPM.h +++ b/bootstrap/unix-48/OPM.h @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #ifndef OPM__h #define OPM__h diff --git a/bootstrap/unix-48/OPP.c b/bootstrap/unix-48/OPP.c index af0d37db..d2b3e83f 100644 --- a/bootstrap/unix-48/OPP.c +++ b/bootstrap/unix-48/OPP.c @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #define INTEGER int16 #define LONGINT int32 diff --git a/bootstrap/unix-48/OPP.h b/bootstrap/unix-48/OPP.h index 6dd03161..28045a86 100644 --- a/bootstrap/unix-48/OPP.h +++ b/bootstrap/unix-48/OPP.h @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #ifndef OPP__h #define OPP__h diff --git a/bootstrap/unix-48/OPS.c b/bootstrap/unix-48/OPS.c index f37bbc27..99aba006 100644 --- a/bootstrap/unix-48/OPS.c +++ b/bootstrap/unix-48/OPS.c @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin tspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin tspaSfF */ #define INTEGER int16 #define LONGINT int32 diff --git a/bootstrap/unix-48/OPS.h b/bootstrap/unix-48/OPS.h index 1b60944c..f7dd1d10 100644 --- a/bootstrap/unix-48/OPS.h +++ b/bootstrap/unix-48/OPS.h @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin tspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin tspaSfF */ #ifndef OPS__h #define OPS__h diff --git a/bootstrap/unix-48/OPT.c b/bootstrap/unix-48/OPT.c index 148fbecb..abd3934b 100644 --- a/bootstrap/unix-48/OPT.c +++ b/bootstrap/unix-48/OPT.c @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #define INTEGER int16 #define LONGINT int32 diff --git a/bootstrap/unix-48/OPT.h b/bootstrap/unix-48/OPT.h index d999d4ec..5de02c8b 100644 --- a/bootstrap/unix-48/OPT.h +++ b/bootstrap/unix-48/OPT.h @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #ifndef OPT__h #define OPT__h diff --git a/bootstrap/unix-48/OPV.c b/bootstrap/unix-48/OPV.c index edb84f81..efddd202 100644 --- a/bootstrap/unix-48/OPV.c +++ b/bootstrap/unix-48/OPV.c @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #define INTEGER int16 #define LONGINT int32 diff --git a/bootstrap/unix-48/OPV.h b/bootstrap/unix-48/OPV.h index a89aa61a..4a3f9d07 100644 --- a/bootstrap/unix-48/OPV.h +++ b/bootstrap/unix-48/OPV.h @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #ifndef OPV__h #define OPV__h diff --git a/bootstrap/unix-48/Platform.c b/bootstrap/unix-48/Platform.c index 2f652641..2bb80b77 100644 --- a/bootstrap/unix-48/Platform.c +++ b/bootstrap/unix-48/Platform.c @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #define INTEGER int16 #define LONGINT int32 diff --git a/bootstrap/unix-48/Platform.h b/bootstrap/unix-48/Platform.h index adbbe116..2b954508 100644 --- a/bootstrap/unix-48/Platform.h +++ b/bootstrap/unix-48/Platform.h @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #ifndef Platform__h #define Platform__h diff --git a/bootstrap/unix-48/Reals.c b/bootstrap/unix-48/Reals.c index dec0e0b4..c1ffff0a 100644 --- a/bootstrap/unix-48/Reals.c +++ b/bootstrap/unix-48/Reals.c @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #define INTEGER int16 #define LONGINT int32 diff --git a/bootstrap/unix-48/Reals.h b/bootstrap/unix-48/Reals.h index 0b779857..0ccc7989 100644 --- a/bootstrap/unix-48/Reals.h +++ b/bootstrap/unix-48/Reals.h @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #ifndef Reals__h #define Reals__h diff --git a/bootstrap/unix-48/Strings.c b/bootstrap/unix-48/Strings.c index 69612295..0f221fe7 100644 --- a/bootstrap/unix-48/Strings.c +++ b/bootstrap/unix-48/Strings.c @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #define INTEGER int16 #define LONGINT int32 diff --git a/bootstrap/unix-48/Strings.h b/bootstrap/unix-48/Strings.h index b4d5f201..9fdb55fb 100644 --- a/bootstrap/unix-48/Strings.h +++ b/bootstrap/unix-48/Strings.h @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #ifndef Strings__h #define Strings__h diff --git a/bootstrap/unix-48/Texts.c b/bootstrap/unix-48/Texts.c index c02becc4..f69de03d 100644 --- a/bootstrap/unix-48/Texts.c +++ b/bootstrap/unix-48/Texts.c @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #define INTEGER int16 #define LONGINT int32 diff --git a/bootstrap/unix-48/Texts.h b/bootstrap/unix-48/Texts.h index fbb113f7..e3ed3241 100644 --- a/bootstrap/unix-48/Texts.h +++ b/bootstrap/unix-48/Texts.h @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #ifndef Texts__h #define Texts__h diff --git a/bootstrap/unix-48/Vishap.c b/bootstrap/unix-48/Vishap.c index 17b498b8..7b2dcd23 100644 --- a/bootstrap/unix-48/Vishap.c +++ b/bootstrap/unix-48/Vishap.c @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspamSf */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspamSf */ #define INTEGER int16 #define LONGINT int32 diff --git a/bootstrap/unix-48/errors.c b/bootstrap/unix-48/errors.c index 95868540..3a4b1ce7 100644 --- a/bootstrap/unix-48/errors.c +++ b/bootstrap/unix-48/errors.c @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #define INTEGER int16 #define LONGINT int32 diff --git a/bootstrap/unix-48/errors.h b/bootstrap/unix-48/errors.h index d574008d..6ca6c961 100644 --- a/bootstrap/unix-48/errors.h +++ b/bootstrap/unix-48/errors.h @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #ifndef errors__h #define errors__h diff --git a/bootstrap/unix-48/extTools.c b/bootstrap/unix-48/extTools.c index 9047ebcc..2167c7f8 100644 --- a/bootstrap/unix-48/extTools.c +++ b/bootstrap/unix-48/extTools.c @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #define INTEGER int16 #define LONGINT int32 diff --git a/bootstrap/unix-48/extTools.h b/bootstrap/unix-48/extTools.h index 847e440e..0b905427 100644 --- a/bootstrap/unix-48/extTools.h +++ b/bootstrap/unix-48/extTools.h @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #ifndef extTools__h #define extTools__h diff --git a/bootstrap/unix-48/vt100.c b/bootstrap/unix-48/vt100.c index a14f3ee0..c337a9e2 100644 --- a/bootstrap/unix-48/vt100.c +++ b/bootstrap/unix-48/vt100.c @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #define INTEGER int16 #define LONGINT int32 diff --git a/bootstrap/unix-48/vt100.h b/bootstrap/unix-48/vt100.h index 1402af8c..2428fce4 100644 --- a/bootstrap/unix-48/vt100.h +++ b/bootstrap/unix-48/vt100.h @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #ifndef vt100__h #define vt100__h diff --git a/bootstrap/unix-88/Configuration.c b/bootstrap/unix-88/Configuration.c index 122d2b82..8945bf88 100644 --- a/bootstrap/unix-88/Configuration.c +++ b/bootstrap/unix-88/Configuration.c @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #define INTEGER int32 #define LONGINT int64 @@ -18,6 +18,6 @@ export void *Configuration__init(void) __DEFMOD; __REGMOD("Configuration", 0); /* BEGIN */ - __MOVE("1.95 [2016/09/21] for gcc LP64 on cygwin", Configuration_versionLong, 41); + __MOVE("1.95 [2016/09/22] for gcc LP64 on cygwin", Configuration_versionLong, 41); __ENDMOD; } diff --git a/bootstrap/unix-88/Configuration.h b/bootstrap/unix-88/Configuration.h index 7fdf5f78..dca477a6 100644 --- a/bootstrap/unix-88/Configuration.h +++ b/bootstrap/unix-88/Configuration.h @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #ifndef Configuration__h #define Configuration__h diff --git a/bootstrap/unix-88/Console.c b/bootstrap/unix-88/Console.c index d489489e..260915fb 100644 --- a/bootstrap/unix-88/Console.c +++ b/bootstrap/unix-88/Console.c @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #define INTEGER int32 #define LONGINT int64 diff --git a/bootstrap/unix-88/Console.h b/bootstrap/unix-88/Console.h index 255cb17c..02fad3c1 100644 --- a/bootstrap/unix-88/Console.h +++ b/bootstrap/unix-88/Console.h @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #ifndef Console__h #define Console__h diff --git a/bootstrap/unix-88/Files.c b/bootstrap/unix-88/Files.c index 1e1dea21..4ce28c47 100644 --- a/bootstrap/unix-88/Files.c +++ b/bootstrap/unix-88/Files.c @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin tspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin tspaSfF */ #define INTEGER int32 #define LONGINT int64 diff --git a/bootstrap/unix-88/Files.h b/bootstrap/unix-88/Files.h index 08a62623..c2270808 100644 --- a/bootstrap/unix-88/Files.h +++ b/bootstrap/unix-88/Files.h @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin tspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin tspaSfF */ #ifndef Files__h #define Files__h diff --git a/bootstrap/unix-88/Heap.c b/bootstrap/unix-88/Heap.c index 85664851..8d65bb87 100644 --- a/bootstrap/unix-88/Heap.c +++ b/bootstrap/unix-88/Heap.c @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin tsSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin tsSfF */ #define INTEGER int32 #define LONGINT int64 diff --git a/bootstrap/unix-88/Heap.h b/bootstrap/unix-88/Heap.h index b11a81ee..516a3aca 100644 --- a/bootstrap/unix-88/Heap.h +++ b/bootstrap/unix-88/Heap.h @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin tsSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin tsSfF */ #ifndef Heap__h #define Heap__h diff --git a/bootstrap/unix-88/Modules.c b/bootstrap/unix-88/Modules.c index 24319ad6..3d3d4700 100644 --- a/bootstrap/unix-88/Modules.c +++ b/bootstrap/unix-88/Modules.c @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #define INTEGER int32 #define LONGINT int64 diff --git a/bootstrap/unix-88/Modules.h b/bootstrap/unix-88/Modules.h index 4c14134c..46624045 100644 --- a/bootstrap/unix-88/Modules.h +++ b/bootstrap/unix-88/Modules.h @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #ifndef Modules__h #define Modules__h diff --git a/bootstrap/unix-88/OPB.c b/bootstrap/unix-88/OPB.c index fab97f6a..c8d64313 100644 --- a/bootstrap/unix-88/OPB.c +++ b/bootstrap/unix-88/OPB.c @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #define INTEGER int32 #define LONGINT int64 diff --git a/bootstrap/unix-88/OPB.h b/bootstrap/unix-88/OPB.h index deb651aa..66bdcc6c 100644 --- a/bootstrap/unix-88/OPB.h +++ b/bootstrap/unix-88/OPB.h @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #ifndef OPB__h #define OPB__h diff --git a/bootstrap/unix-88/OPC.c b/bootstrap/unix-88/OPC.c index dd9e2a18..a01fcde9 100644 --- a/bootstrap/unix-88/OPC.c +++ b/bootstrap/unix-88/OPC.c @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #define INTEGER int32 #define LONGINT int64 diff --git a/bootstrap/unix-88/OPC.h b/bootstrap/unix-88/OPC.h index ae8e7035..4a7c8523 100644 --- a/bootstrap/unix-88/OPC.h +++ b/bootstrap/unix-88/OPC.h @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #ifndef OPC__h #define OPC__h diff --git a/bootstrap/unix-88/OPM.c b/bootstrap/unix-88/OPM.c index 1b8dca0d..22131ab9 100644 --- a/bootstrap/unix-88/OPM.c +++ b/bootstrap/unix-88/OPM.c @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #define INTEGER int32 #define LONGINT int64 @@ -268,11 +268,13 @@ BOOLEAN OPM_OpenPar (void) CHAR s[256]; if (Platform_ArgCount == 1) { OPM_LogWLn(); - OPM_LogWStr((CHAR*)"Vishap Oberon-2 compiler v", 27); + OPM_LogWStr((CHAR*)"Oberon-2 compiler v", 20); OPM_LogWStr(Configuration_versionLong, 41); OPM_LogW('.'); OPM_LogWLn(); - OPM_LogWStr((CHAR*)"Based on Ofront by Software Templ OEG, continued by Norayr Chilingarian and others.", 84); + OPM_LogWStr((CHAR*)"Based on Ofront by Software Templ OEG.", 39); + OPM_LogWLn(); + OPM_LogWStr((CHAR*)"Further development by Norayr Chilingarian, David Brown and others.", 68); OPM_LogWLn(); OPM_LogWLn(); OPM_LogWStr((CHAR*)"Usage:", 7); @@ -288,15 +290,15 @@ BOOLEAN OPM_OpenPar (void) OPM_LogWLn(); OPM_LogWStr((CHAR*)" Run time safety", 18); OPM_LogWLn(); - OPM_LogWStr((CHAR*)" -p Initialise pointers to NIL.", 37); + OPM_LogWStr((CHAR*)" -p Initialise pointers to NIL. On by default.", 52); OPM_LogWLn(); - OPM_LogWStr((CHAR*)" -a Halt on assertion failures.", 37); + OPM_LogWStr((CHAR*)" -a Halt on assertion failures. On by default.", 52); OPM_LogWLn(); OPM_LogWStr((CHAR*)" -r Halt on range check failures.", 39); OPM_LogWLn(); - OPM_LogWStr((CHAR*)" -t Halt on type guad failure.", 36); + OPM_LogWStr((CHAR*)" -t Halt on type guard failure. On by default.", 52); OPM_LogWLn(); - OPM_LogWStr((CHAR*)" -x Halt on index out of range.", 37); + OPM_LogWStr((CHAR*)" -x Halt on index out of range. On by default.", 52); OPM_LogWLn(); OPM_LogWLn(); OPM_LogWStr((CHAR*)" Symbol file management", 25); @@ -326,16 +328,16 @@ BOOLEAN OPM_OpenPar (void) OPM_LogWStr((CHAR*)" -V Display compiler debugging messages.", 46); OPM_LogWLn(); OPM_LogWLn(); - OPM_LogWStr((CHAR*)" Size model for elementary types", 34); + OPM_LogWStr((CHAR*)" Size model for elementary types (default O2 on 32 bit builds, OV on 64 bits)", 79); OPM_LogWLn(); - OPM_LogWStr((CHAR*)" -O2 Original Oberon / Oberon-2: 8 bit SHORTINT, 16 bit INTEGER, 32 bit LONGINT and SET.", 94); + OPM_LogWStr((CHAR*)" -O2 Original Oberon / Oberon-2: 8 bit SHORTINT, 16 bit INTEGER, 32 bit LONGINT and SET.", 95); OPM_LogWLn(); - OPM_LogWStr((CHAR*)" -OC Component Pascal: 16 bit SHORTINT, 32 bit INTEGER, 64 bit LONGINT and SET.", 94); + OPM_LogWStr((CHAR*)" -OC Component Pascal: 16 bit SHORTINT, 32 bit INTEGER, 64 bit LONGINT and SET.", 95); OPM_LogWLn(); - OPM_LogWStr((CHAR*)" -OV Alternate large model: 8 bit SHORTINT, 32 bit INTEGER, 64 bit LONGINT and SET.", 94); + OPM_LogWStr((CHAR*)" -OV Alternate large model: 8 bit SHORTINT, 32 bit INTEGER, 64 bit LONGINT and SET.", 95); OPM_LogWLn(); OPM_LogWLn(); - OPM_LogWStr((CHAR*)" Target machine address size and alignment", 44); + OPM_LogWStr((CHAR*)" Target machine address size and alignment (default is that of the running compiler binary)", 93); OPM_LogWLn(); OPM_LogWStr((CHAR*)" -A44 32 bit addresses, 32 bit alignment (e.g. Unix/linux 32 bit on x86).", 79); OPM_LogWLn(); @@ -344,6 +346,8 @@ BOOLEAN OPM_OpenPar (void) OPM_LogWStr((CHAR*)" -A88 66 bit addresses, 64 bit alignment (e.g. 64 bit platforms).", 71); OPM_LogWLn(); OPM_LogWLn(); + OPM_LogWStr((CHAR*)"All options are off by default, except where noted above.", 58); + OPM_LogWLn(); OPM_LogWStr((CHAR*)"Initial options specify defaults for all files.", 48); OPM_LogWLn(); OPM_LogWStr((CHAR*)"Options following a filename are specific to that file.", 56); diff --git a/bootstrap/unix-88/OPM.h b/bootstrap/unix-88/OPM.h index e2737249..b1fab659 100644 --- a/bootstrap/unix-88/OPM.h +++ b/bootstrap/unix-88/OPM.h @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #ifndef OPM__h #define OPM__h diff --git a/bootstrap/unix-88/OPP.c b/bootstrap/unix-88/OPP.c index e9fcba89..8c85929d 100644 --- a/bootstrap/unix-88/OPP.c +++ b/bootstrap/unix-88/OPP.c @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #define INTEGER int32 #define LONGINT int64 diff --git a/bootstrap/unix-88/OPP.h b/bootstrap/unix-88/OPP.h index 6dd03161..28045a86 100644 --- a/bootstrap/unix-88/OPP.h +++ b/bootstrap/unix-88/OPP.h @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #ifndef OPP__h #define OPP__h diff --git a/bootstrap/unix-88/OPS.c b/bootstrap/unix-88/OPS.c index d79e207f..869dfa4b 100644 --- a/bootstrap/unix-88/OPS.c +++ b/bootstrap/unix-88/OPS.c @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin tspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin tspaSfF */ #define INTEGER int32 #define LONGINT int64 diff --git a/bootstrap/unix-88/OPS.h b/bootstrap/unix-88/OPS.h index 40853589..7de91cb4 100644 --- a/bootstrap/unix-88/OPS.h +++ b/bootstrap/unix-88/OPS.h @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin tspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin tspaSfF */ #ifndef OPS__h #define OPS__h diff --git a/bootstrap/unix-88/OPT.c b/bootstrap/unix-88/OPT.c index 63b773cd..2dd48c74 100644 --- a/bootstrap/unix-88/OPT.c +++ b/bootstrap/unix-88/OPT.c @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #define INTEGER int32 #define LONGINT int64 diff --git a/bootstrap/unix-88/OPT.h b/bootstrap/unix-88/OPT.h index 0cc86a01..a1956589 100644 --- a/bootstrap/unix-88/OPT.h +++ b/bootstrap/unix-88/OPT.h @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #ifndef OPT__h #define OPT__h diff --git a/bootstrap/unix-88/OPV.c b/bootstrap/unix-88/OPV.c index 8026831f..22d0def4 100644 --- a/bootstrap/unix-88/OPV.c +++ b/bootstrap/unix-88/OPV.c @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #define INTEGER int32 #define LONGINT int64 diff --git a/bootstrap/unix-88/OPV.h b/bootstrap/unix-88/OPV.h index a89aa61a..4a3f9d07 100644 --- a/bootstrap/unix-88/OPV.h +++ b/bootstrap/unix-88/OPV.h @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #ifndef OPV__h #define OPV__h diff --git a/bootstrap/unix-88/Platform.c b/bootstrap/unix-88/Platform.c index 99577840..c318921f 100644 --- a/bootstrap/unix-88/Platform.c +++ b/bootstrap/unix-88/Platform.c @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #define INTEGER int32 #define LONGINT int64 diff --git a/bootstrap/unix-88/Platform.h b/bootstrap/unix-88/Platform.h index 06414b7c..e4145b85 100644 --- a/bootstrap/unix-88/Platform.h +++ b/bootstrap/unix-88/Platform.h @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #ifndef Platform__h #define Platform__h diff --git a/bootstrap/unix-88/Reals.c b/bootstrap/unix-88/Reals.c index f2623b03..039a3b6d 100644 --- a/bootstrap/unix-88/Reals.c +++ b/bootstrap/unix-88/Reals.c @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #define INTEGER int32 #define LONGINT int64 diff --git a/bootstrap/unix-88/Reals.h b/bootstrap/unix-88/Reals.h index 05b31bee..e27d5dca 100644 --- a/bootstrap/unix-88/Reals.h +++ b/bootstrap/unix-88/Reals.h @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #ifndef Reals__h #define Reals__h diff --git a/bootstrap/unix-88/Strings.c b/bootstrap/unix-88/Strings.c index 4226bdb9..2f1a7062 100644 --- a/bootstrap/unix-88/Strings.c +++ b/bootstrap/unix-88/Strings.c @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #define INTEGER int32 #define LONGINT int64 diff --git a/bootstrap/unix-88/Strings.h b/bootstrap/unix-88/Strings.h index b13ba079..90baacae 100644 --- a/bootstrap/unix-88/Strings.h +++ b/bootstrap/unix-88/Strings.h @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #ifndef Strings__h #define Strings__h diff --git a/bootstrap/unix-88/Texts.c b/bootstrap/unix-88/Texts.c index 4cdaa6b9..ee371c4e 100644 --- a/bootstrap/unix-88/Texts.c +++ b/bootstrap/unix-88/Texts.c @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #define INTEGER int32 #define LONGINT int64 diff --git a/bootstrap/unix-88/Texts.h b/bootstrap/unix-88/Texts.h index 10d0a9bb..32047663 100644 --- a/bootstrap/unix-88/Texts.h +++ b/bootstrap/unix-88/Texts.h @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #ifndef Texts__h #define Texts__h diff --git a/bootstrap/unix-88/Vishap.c b/bootstrap/unix-88/Vishap.c index e1d112ec..87812cc2 100644 --- a/bootstrap/unix-88/Vishap.c +++ b/bootstrap/unix-88/Vishap.c @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspamSf */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspamSf */ #define INTEGER int32 #define LONGINT int64 diff --git a/bootstrap/unix-88/errors.c b/bootstrap/unix-88/errors.c index ca898552..897999f4 100644 --- a/bootstrap/unix-88/errors.c +++ b/bootstrap/unix-88/errors.c @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #define INTEGER int32 #define LONGINT int64 diff --git a/bootstrap/unix-88/errors.h b/bootstrap/unix-88/errors.h index d574008d..6ca6c961 100644 --- a/bootstrap/unix-88/errors.h +++ b/bootstrap/unix-88/errors.h @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #ifndef errors__h #define errors__h diff --git a/bootstrap/unix-88/extTools.c b/bootstrap/unix-88/extTools.c index db3aec30..1647c4fe 100644 --- a/bootstrap/unix-88/extTools.c +++ b/bootstrap/unix-88/extTools.c @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #define INTEGER int32 #define LONGINT int64 diff --git a/bootstrap/unix-88/extTools.h b/bootstrap/unix-88/extTools.h index 847e440e..0b905427 100644 --- a/bootstrap/unix-88/extTools.h +++ b/bootstrap/unix-88/extTools.h @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #ifndef extTools__h #define extTools__h diff --git a/bootstrap/unix-88/vt100.c b/bootstrap/unix-88/vt100.c index ac832261..8b57066f 100644 --- a/bootstrap/unix-88/vt100.c +++ b/bootstrap/unix-88/vt100.c @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #define INTEGER int32 #define LONGINT int64 diff --git a/bootstrap/unix-88/vt100.h b/bootstrap/unix-88/vt100.h index 054f6ddd..e8809371 100644 --- a/bootstrap/unix-88/vt100.h +++ b/bootstrap/unix-88/vt100.h @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #ifndef vt100__h #define vt100__h diff --git a/bootstrap/windows-48/Configuration.c b/bootstrap/windows-48/Configuration.c index c780cc96..b17dc344 100644 --- a/bootstrap/windows-48/Configuration.c +++ b/bootstrap/windows-48/Configuration.c @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #define INTEGER int16 #define LONGINT int32 @@ -18,6 +18,6 @@ export void *Configuration__init(void) __DEFMOD; __REGMOD("Configuration", 0); /* BEGIN */ - __MOVE("1.95 [2016/09/21] for gcc LP64 on cygwin", Configuration_versionLong, 41); + __MOVE("1.95 [2016/09/22] for gcc LP64 on cygwin", Configuration_versionLong, 41); __ENDMOD; } diff --git a/bootstrap/windows-48/Configuration.h b/bootstrap/windows-48/Configuration.h index 7fdf5f78..dca477a6 100644 --- a/bootstrap/windows-48/Configuration.h +++ b/bootstrap/windows-48/Configuration.h @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #ifndef Configuration__h #define Configuration__h diff --git a/bootstrap/windows-48/Console.c b/bootstrap/windows-48/Console.c index 9c3127a1..8a36bd2f 100644 --- a/bootstrap/windows-48/Console.c +++ b/bootstrap/windows-48/Console.c @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #define INTEGER int16 #define LONGINT int32 diff --git a/bootstrap/windows-48/Console.h b/bootstrap/windows-48/Console.h index c8de3606..6837ab77 100644 --- a/bootstrap/windows-48/Console.h +++ b/bootstrap/windows-48/Console.h @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #ifndef Console__h #define Console__h diff --git a/bootstrap/windows-48/Files.c b/bootstrap/windows-48/Files.c index 80926272..3c273102 100644 --- a/bootstrap/windows-48/Files.c +++ b/bootstrap/windows-48/Files.c @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin tspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin tspaSfF */ #define INTEGER int16 #define LONGINT int32 diff --git a/bootstrap/windows-48/Files.h b/bootstrap/windows-48/Files.h index ade97ac7..1e8c0d89 100644 --- a/bootstrap/windows-48/Files.h +++ b/bootstrap/windows-48/Files.h @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin tspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin tspaSfF */ #ifndef Files__h #define Files__h diff --git a/bootstrap/windows-48/Heap.c b/bootstrap/windows-48/Heap.c index 50823221..17784d67 100644 --- a/bootstrap/windows-48/Heap.c +++ b/bootstrap/windows-48/Heap.c @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin tsSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin tsSfF */ #define INTEGER int16 #define LONGINT int32 diff --git a/bootstrap/windows-48/Heap.h b/bootstrap/windows-48/Heap.h index 57904466..b1c745df 100644 --- a/bootstrap/windows-48/Heap.h +++ b/bootstrap/windows-48/Heap.h @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin tsSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin tsSfF */ #ifndef Heap__h #define Heap__h diff --git a/bootstrap/windows-48/Modules.c b/bootstrap/windows-48/Modules.c index 1c66c8e5..1564f5e0 100644 --- a/bootstrap/windows-48/Modules.c +++ b/bootstrap/windows-48/Modules.c @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #define INTEGER int16 #define LONGINT int32 diff --git a/bootstrap/windows-48/Modules.h b/bootstrap/windows-48/Modules.h index 13b6dbed..dbc243c8 100644 --- a/bootstrap/windows-48/Modules.h +++ b/bootstrap/windows-48/Modules.h @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #ifndef Modules__h #define Modules__h diff --git a/bootstrap/windows-48/OPB.c b/bootstrap/windows-48/OPB.c index c9ebd8f5..99ca6ea0 100644 --- a/bootstrap/windows-48/OPB.c +++ b/bootstrap/windows-48/OPB.c @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #define INTEGER int16 #define LONGINT int32 diff --git a/bootstrap/windows-48/OPB.h b/bootstrap/windows-48/OPB.h index cdd33f1b..434172a2 100644 --- a/bootstrap/windows-48/OPB.h +++ b/bootstrap/windows-48/OPB.h @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #ifndef OPB__h #define OPB__h diff --git a/bootstrap/windows-48/OPC.c b/bootstrap/windows-48/OPC.c index 6b7d1b01..11f64b59 100644 --- a/bootstrap/windows-48/OPC.c +++ b/bootstrap/windows-48/OPC.c @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #define INTEGER int16 #define LONGINT int32 diff --git a/bootstrap/windows-48/OPC.h b/bootstrap/windows-48/OPC.h index b398282e..09952648 100644 --- a/bootstrap/windows-48/OPC.h +++ b/bootstrap/windows-48/OPC.h @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #ifndef OPC__h #define OPC__h diff --git a/bootstrap/windows-48/OPM.c b/bootstrap/windows-48/OPM.c index 0086ff0f..2122bed9 100644 --- a/bootstrap/windows-48/OPM.c +++ b/bootstrap/windows-48/OPM.c @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #define INTEGER int16 #define LONGINT int32 @@ -269,11 +269,13 @@ BOOLEAN OPM_OpenPar (void) CHAR s[256]; if (Platform_ArgCount == 1) { OPM_LogWLn(); - OPM_LogWStr((CHAR*)"Vishap Oberon-2 compiler v", 27); + OPM_LogWStr((CHAR*)"Oberon-2 compiler v", 20); OPM_LogWStr(Configuration_versionLong, 41); OPM_LogW('.'); OPM_LogWLn(); - OPM_LogWStr((CHAR*)"Based on Ofront by Software Templ OEG, continued by Norayr Chilingarian and others.", 84); + OPM_LogWStr((CHAR*)"Based on Ofront by Software Templ OEG.", 39); + OPM_LogWLn(); + OPM_LogWStr((CHAR*)"Further development by Norayr Chilingarian, David Brown and others.", 68); OPM_LogWLn(); OPM_LogWLn(); OPM_LogWStr((CHAR*)"Usage:", 7); @@ -289,15 +291,15 @@ BOOLEAN OPM_OpenPar (void) OPM_LogWLn(); OPM_LogWStr((CHAR*)" Run time safety", 18); OPM_LogWLn(); - OPM_LogWStr((CHAR*)" -p Initialise pointers to NIL.", 37); + OPM_LogWStr((CHAR*)" -p Initialise pointers to NIL. On by default.", 52); OPM_LogWLn(); - OPM_LogWStr((CHAR*)" -a Halt on assertion failures.", 37); + OPM_LogWStr((CHAR*)" -a Halt on assertion failures. On by default.", 52); OPM_LogWLn(); OPM_LogWStr((CHAR*)" -r Halt on range check failures.", 39); OPM_LogWLn(); - OPM_LogWStr((CHAR*)" -t Halt on type guad failure.", 36); + OPM_LogWStr((CHAR*)" -t Halt on type guard failure. On by default.", 52); OPM_LogWLn(); - OPM_LogWStr((CHAR*)" -x Halt on index out of range.", 37); + OPM_LogWStr((CHAR*)" -x Halt on index out of range. On by default.", 52); OPM_LogWLn(); OPM_LogWLn(); OPM_LogWStr((CHAR*)" Symbol file management", 25); @@ -327,16 +329,16 @@ BOOLEAN OPM_OpenPar (void) OPM_LogWStr((CHAR*)" -V Display compiler debugging messages.", 46); OPM_LogWLn(); OPM_LogWLn(); - OPM_LogWStr((CHAR*)" Size model for elementary types", 34); + OPM_LogWStr((CHAR*)" Size model for elementary types (default O2 on 32 bit builds, OV on 64 bits)", 79); OPM_LogWLn(); - OPM_LogWStr((CHAR*)" -O2 Original Oberon / Oberon-2: 8 bit SHORTINT, 16 bit INTEGER, 32 bit LONGINT and SET.", 94); + OPM_LogWStr((CHAR*)" -O2 Original Oberon / Oberon-2: 8 bit SHORTINT, 16 bit INTEGER, 32 bit LONGINT and SET.", 95); OPM_LogWLn(); - OPM_LogWStr((CHAR*)" -OC Component Pascal: 16 bit SHORTINT, 32 bit INTEGER, 64 bit LONGINT and SET.", 94); + OPM_LogWStr((CHAR*)" -OC Component Pascal: 16 bit SHORTINT, 32 bit INTEGER, 64 bit LONGINT and SET.", 95); OPM_LogWLn(); - OPM_LogWStr((CHAR*)" -OV Alternate large model: 8 bit SHORTINT, 32 bit INTEGER, 64 bit LONGINT and SET.", 94); + OPM_LogWStr((CHAR*)" -OV Alternate large model: 8 bit SHORTINT, 32 bit INTEGER, 64 bit LONGINT and SET.", 95); OPM_LogWLn(); OPM_LogWLn(); - OPM_LogWStr((CHAR*)" Target machine address size and alignment", 44); + OPM_LogWStr((CHAR*)" Target machine address size and alignment (default is that of the running compiler binary)", 93); OPM_LogWLn(); OPM_LogWStr((CHAR*)" -A44 32 bit addresses, 32 bit alignment (e.g. Unix/linux 32 bit on x86).", 79); OPM_LogWLn(); @@ -345,6 +347,8 @@ BOOLEAN OPM_OpenPar (void) OPM_LogWStr((CHAR*)" -A88 66 bit addresses, 64 bit alignment (e.g. 64 bit platforms).", 71); OPM_LogWLn(); OPM_LogWLn(); + OPM_LogWStr((CHAR*)"All options are off by default, except where noted above.", 58); + OPM_LogWLn(); OPM_LogWStr((CHAR*)"Initial options specify defaults for all files.", 48); OPM_LogWLn(); OPM_LogWStr((CHAR*)"Options following a filename are specific to that file.", 56); diff --git a/bootstrap/windows-48/OPM.h b/bootstrap/windows-48/OPM.h index b32da345..8ca21351 100644 --- a/bootstrap/windows-48/OPM.h +++ b/bootstrap/windows-48/OPM.h @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #ifndef OPM__h #define OPM__h diff --git a/bootstrap/windows-48/OPP.c b/bootstrap/windows-48/OPP.c index af0d37db..d2b3e83f 100644 --- a/bootstrap/windows-48/OPP.c +++ b/bootstrap/windows-48/OPP.c @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #define INTEGER int16 #define LONGINT int32 diff --git a/bootstrap/windows-48/OPP.h b/bootstrap/windows-48/OPP.h index 6dd03161..28045a86 100644 --- a/bootstrap/windows-48/OPP.h +++ b/bootstrap/windows-48/OPP.h @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #ifndef OPP__h #define OPP__h diff --git a/bootstrap/windows-48/OPS.c b/bootstrap/windows-48/OPS.c index f37bbc27..99aba006 100644 --- a/bootstrap/windows-48/OPS.c +++ b/bootstrap/windows-48/OPS.c @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin tspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin tspaSfF */ #define INTEGER int16 #define LONGINT int32 diff --git a/bootstrap/windows-48/OPS.h b/bootstrap/windows-48/OPS.h index 1b60944c..f7dd1d10 100644 --- a/bootstrap/windows-48/OPS.h +++ b/bootstrap/windows-48/OPS.h @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin tspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin tspaSfF */ #ifndef OPS__h #define OPS__h diff --git a/bootstrap/windows-48/OPT.c b/bootstrap/windows-48/OPT.c index 148fbecb..abd3934b 100644 --- a/bootstrap/windows-48/OPT.c +++ b/bootstrap/windows-48/OPT.c @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #define INTEGER int16 #define LONGINT int32 diff --git a/bootstrap/windows-48/OPT.h b/bootstrap/windows-48/OPT.h index d999d4ec..5de02c8b 100644 --- a/bootstrap/windows-48/OPT.h +++ b/bootstrap/windows-48/OPT.h @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #ifndef OPT__h #define OPT__h diff --git a/bootstrap/windows-48/OPV.c b/bootstrap/windows-48/OPV.c index edb84f81..efddd202 100644 --- a/bootstrap/windows-48/OPV.c +++ b/bootstrap/windows-48/OPV.c @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #define INTEGER int16 #define LONGINT int32 diff --git a/bootstrap/windows-48/OPV.h b/bootstrap/windows-48/OPV.h index a89aa61a..4a3f9d07 100644 --- a/bootstrap/windows-48/OPV.h +++ b/bootstrap/windows-48/OPV.h @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #ifndef OPV__h #define OPV__h diff --git a/bootstrap/windows-48/Platform.c b/bootstrap/windows-48/Platform.c index 12ced558..f8d3f76c 100644 --- a/bootstrap/windows-48/Platform.c +++ b/bootstrap/windows-48/Platform.c @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #define INTEGER int16 #define LONGINT int32 diff --git a/bootstrap/windows-48/Platform.h b/bootstrap/windows-48/Platform.h index 75f53fa0..c93c79ce 100644 --- a/bootstrap/windows-48/Platform.h +++ b/bootstrap/windows-48/Platform.h @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #ifndef Platform__h #define Platform__h diff --git a/bootstrap/windows-48/Reals.c b/bootstrap/windows-48/Reals.c index dec0e0b4..c1ffff0a 100644 --- a/bootstrap/windows-48/Reals.c +++ b/bootstrap/windows-48/Reals.c @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #define INTEGER int16 #define LONGINT int32 diff --git a/bootstrap/windows-48/Reals.h b/bootstrap/windows-48/Reals.h index 0b779857..0ccc7989 100644 --- a/bootstrap/windows-48/Reals.h +++ b/bootstrap/windows-48/Reals.h @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #ifndef Reals__h #define Reals__h diff --git a/bootstrap/windows-48/Strings.c b/bootstrap/windows-48/Strings.c index 69612295..0f221fe7 100644 --- a/bootstrap/windows-48/Strings.c +++ b/bootstrap/windows-48/Strings.c @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #define INTEGER int16 #define LONGINT int32 diff --git a/bootstrap/windows-48/Strings.h b/bootstrap/windows-48/Strings.h index b4d5f201..9fdb55fb 100644 --- a/bootstrap/windows-48/Strings.h +++ b/bootstrap/windows-48/Strings.h @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #ifndef Strings__h #define Strings__h diff --git a/bootstrap/windows-48/Texts.c b/bootstrap/windows-48/Texts.c index c02becc4..f69de03d 100644 --- a/bootstrap/windows-48/Texts.c +++ b/bootstrap/windows-48/Texts.c @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #define INTEGER int16 #define LONGINT int32 diff --git a/bootstrap/windows-48/Texts.h b/bootstrap/windows-48/Texts.h index fbb113f7..e3ed3241 100644 --- a/bootstrap/windows-48/Texts.h +++ b/bootstrap/windows-48/Texts.h @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #ifndef Texts__h #define Texts__h diff --git a/bootstrap/windows-48/Vishap.c b/bootstrap/windows-48/Vishap.c index 17b498b8..7b2dcd23 100644 --- a/bootstrap/windows-48/Vishap.c +++ b/bootstrap/windows-48/Vishap.c @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspamSf */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspamSf */ #define INTEGER int16 #define LONGINT int32 diff --git a/bootstrap/windows-48/errors.c b/bootstrap/windows-48/errors.c index 95868540..3a4b1ce7 100644 --- a/bootstrap/windows-48/errors.c +++ b/bootstrap/windows-48/errors.c @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #define INTEGER int16 #define LONGINT int32 diff --git a/bootstrap/windows-48/errors.h b/bootstrap/windows-48/errors.h index d574008d..6ca6c961 100644 --- a/bootstrap/windows-48/errors.h +++ b/bootstrap/windows-48/errors.h @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #ifndef errors__h #define errors__h diff --git a/bootstrap/windows-48/extTools.c b/bootstrap/windows-48/extTools.c index 9047ebcc..2167c7f8 100644 --- a/bootstrap/windows-48/extTools.c +++ b/bootstrap/windows-48/extTools.c @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #define INTEGER int16 #define LONGINT int32 diff --git a/bootstrap/windows-48/extTools.h b/bootstrap/windows-48/extTools.h index 847e440e..0b905427 100644 --- a/bootstrap/windows-48/extTools.h +++ b/bootstrap/windows-48/extTools.h @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #ifndef extTools__h #define extTools__h diff --git a/bootstrap/windows-48/vt100.c b/bootstrap/windows-48/vt100.c index a14f3ee0..c337a9e2 100644 --- a/bootstrap/windows-48/vt100.c +++ b/bootstrap/windows-48/vt100.c @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #define INTEGER int16 #define LONGINT int32 diff --git a/bootstrap/windows-48/vt100.h b/bootstrap/windows-48/vt100.h index 1402af8c..2428fce4 100644 --- a/bootstrap/windows-48/vt100.h +++ b/bootstrap/windows-48/vt100.h @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #ifndef vt100__h #define vt100__h diff --git a/bootstrap/windows-88/Configuration.c b/bootstrap/windows-88/Configuration.c index 122d2b82..8945bf88 100644 --- a/bootstrap/windows-88/Configuration.c +++ b/bootstrap/windows-88/Configuration.c @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #define INTEGER int32 #define LONGINT int64 @@ -18,6 +18,6 @@ export void *Configuration__init(void) __DEFMOD; __REGMOD("Configuration", 0); /* BEGIN */ - __MOVE("1.95 [2016/09/21] for gcc LP64 on cygwin", Configuration_versionLong, 41); + __MOVE("1.95 [2016/09/22] for gcc LP64 on cygwin", Configuration_versionLong, 41); __ENDMOD; } diff --git a/bootstrap/windows-88/Configuration.h b/bootstrap/windows-88/Configuration.h index 7fdf5f78..dca477a6 100644 --- a/bootstrap/windows-88/Configuration.h +++ b/bootstrap/windows-88/Configuration.h @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #ifndef Configuration__h #define Configuration__h diff --git a/bootstrap/windows-88/Console.c b/bootstrap/windows-88/Console.c index 6a1cec2c..23f25bda 100644 --- a/bootstrap/windows-88/Console.c +++ b/bootstrap/windows-88/Console.c @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #define INTEGER int32 #define LONGINT int64 diff --git a/bootstrap/windows-88/Console.h b/bootstrap/windows-88/Console.h index 255cb17c..02fad3c1 100644 --- a/bootstrap/windows-88/Console.h +++ b/bootstrap/windows-88/Console.h @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #ifndef Console__h #define Console__h diff --git a/bootstrap/windows-88/Files.c b/bootstrap/windows-88/Files.c index 546f8b08..ea935dee 100644 --- a/bootstrap/windows-88/Files.c +++ b/bootstrap/windows-88/Files.c @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin tspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin tspaSfF */ #define INTEGER int32 #define LONGINT int64 diff --git a/bootstrap/windows-88/Files.h b/bootstrap/windows-88/Files.h index 0aae236a..1fa0bb84 100644 --- a/bootstrap/windows-88/Files.h +++ b/bootstrap/windows-88/Files.h @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin tspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin tspaSfF */ #ifndef Files__h #define Files__h diff --git a/bootstrap/windows-88/Heap.c b/bootstrap/windows-88/Heap.c index 85664851..8d65bb87 100644 --- a/bootstrap/windows-88/Heap.c +++ b/bootstrap/windows-88/Heap.c @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin tsSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin tsSfF */ #define INTEGER int32 #define LONGINT int64 diff --git a/bootstrap/windows-88/Heap.h b/bootstrap/windows-88/Heap.h index b11a81ee..516a3aca 100644 --- a/bootstrap/windows-88/Heap.h +++ b/bootstrap/windows-88/Heap.h @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin tsSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin tsSfF */ #ifndef Heap__h #define Heap__h diff --git a/bootstrap/windows-88/Modules.c b/bootstrap/windows-88/Modules.c index 24319ad6..3d3d4700 100644 --- a/bootstrap/windows-88/Modules.c +++ b/bootstrap/windows-88/Modules.c @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #define INTEGER int32 #define LONGINT int64 diff --git a/bootstrap/windows-88/Modules.h b/bootstrap/windows-88/Modules.h index 4c14134c..46624045 100644 --- a/bootstrap/windows-88/Modules.h +++ b/bootstrap/windows-88/Modules.h @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #ifndef Modules__h #define Modules__h diff --git a/bootstrap/windows-88/OPB.c b/bootstrap/windows-88/OPB.c index fab97f6a..c8d64313 100644 --- a/bootstrap/windows-88/OPB.c +++ b/bootstrap/windows-88/OPB.c @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #define INTEGER int32 #define LONGINT int64 diff --git a/bootstrap/windows-88/OPB.h b/bootstrap/windows-88/OPB.h index deb651aa..66bdcc6c 100644 --- a/bootstrap/windows-88/OPB.h +++ b/bootstrap/windows-88/OPB.h @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #ifndef OPB__h #define OPB__h diff --git a/bootstrap/windows-88/OPC.c b/bootstrap/windows-88/OPC.c index dd9e2a18..a01fcde9 100644 --- a/bootstrap/windows-88/OPC.c +++ b/bootstrap/windows-88/OPC.c @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #define INTEGER int32 #define LONGINT int64 diff --git a/bootstrap/windows-88/OPC.h b/bootstrap/windows-88/OPC.h index ae8e7035..4a7c8523 100644 --- a/bootstrap/windows-88/OPC.h +++ b/bootstrap/windows-88/OPC.h @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #ifndef OPC__h #define OPC__h diff --git a/bootstrap/windows-88/OPM.c b/bootstrap/windows-88/OPM.c index 1b8dca0d..22131ab9 100644 --- a/bootstrap/windows-88/OPM.c +++ b/bootstrap/windows-88/OPM.c @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #define INTEGER int32 #define LONGINT int64 @@ -268,11 +268,13 @@ BOOLEAN OPM_OpenPar (void) CHAR s[256]; if (Platform_ArgCount == 1) { OPM_LogWLn(); - OPM_LogWStr((CHAR*)"Vishap Oberon-2 compiler v", 27); + OPM_LogWStr((CHAR*)"Oberon-2 compiler v", 20); OPM_LogWStr(Configuration_versionLong, 41); OPM_LogW('.'); OPM_LogWLn(); - OPM_LogWStr((CHAR*)"Based on Ofront by Software Templ OEG, continued by Norayr Chilingarian and others.", 84); + OPM_LogWStr((CHAR*)"Based on Ofront by Software Templ OEG.", 39); + OPM_LogWLn(); + OPM_LogWStr((CHAR*)"Further development by Norayr Chilingarian, David Brown and others.", 68); OPM_LogWLn(); OPM_LogWLn(); OPM_LogWStr((CHAR*)"Usage:", 7); @@ -288,15 +290,15 @@ BOOLEAN OPM_OpenPar (void) OPM_LogWLn(); OPM_LogWStr((CHAR*)" Run time safety", 18); OPM_LogWLn(); - OPM_LogWStr((CHAR*)" -p Initialise pointers to NIL.", 37); + OPM_LogWStr((CHAR*)" -p Initialise pointers to NIL. On by default.", 52); OPM_LogWLn(); - OPM_LogWStr((CHAR*)" -a Halt on assertion failures.", 37); + OPM_LogWStr((CHAR*)" -a Halt on assertion failures. On by default.", 52); OPM_LogWLn(); OPM_LogWStr((CHAR*)" -r Halt on range check failures.", 39); OPM_LogWLn(); - OPM_LogWStr((CHAR*)" -t Halt on type guad failure.", 36); + OPM_LogWStr((CHAR*)" -t Halt on type guard failure. On by default.", 52); OPM_LogWLn(); - OPM_LogWStr((CHAR*)" -x Halt on index out of range.", 37); + OPM_LogWStr((CHAR*)" -x Halt on index out of range. On by default.", 52); OPM_LogWLn(); OPM_LogWLn(); OPM_LogWStr((CHAR*)" Symbol file management", 25); @@ -326,16 +328,16 @@ BOOLEAN OPM_OpenPar (void) OPM_LogWStr((CHAR*)" -V Display compiler debugging messages.", 46); OPM_LogWLn(); OPM_LogWLn(); - OPM_LogWStr((CHAR*)" Size model for elementary types", 34); + OPM_LogWStr((CHAR*)" Size model for elementary types (default O2 on 32 bit builds, OV on 64 bits)", 79); OPM_LogWLn(); - OPM_LogWStr((CHAR*)" -O2 Original Oberon / Oberon-2: 8 bit SHORTINT, 16 bit INTEGER, 32 bit LONGINT and SET.", 94); + OPM_LogWStr((CHAR*)" -O2 Original Oberon / Oberon-2: 8 bit SHORTINT, 16 bit INTEGER, 32 bit LONGINT and SET.", 95); OPM_LogWLn(); - OPM_LogWStr((CHAR*)" -OC Component Pascal: 16 bit SHORTINT, 32 bit INTEGER, 64 bit LONGINT and SET.", 94); + OPM_LogWStr((CHAR*)" -OC Component Pascal: 16 bit SHORTINT, 32 bit INTEGER, 64 bit LONGINT and SET.", 95); OPM_LogWLn(); - OPM_LogWStr((CHAR*)" -OV Alternate large model: 8 bit SHORTINT, 32 bit INTEGER, 64 bit LONGINT and SET.", 94); + OPM_LogWStr((CHAR*)" -OV Alternate large model: 8 bit SHORTINT, 32 bit INTEGER, 64 bit LONGINT and SET.", 95); OPM_LogWLn(); OPM_LogWLn(); - OPM_LogWStr((CHAR*)" Target machine address size and alignment", 44); + OPM_LogWStr((CHAR*)" Target machine address size and alignment (default is that of the running compiler binary)", 93); OPM_LogWLn(); OPM_LogWStr((CHAR*)" -A44 32 bit addresses, 32 bit alignment (e.g. Unix/linux 32 bit on x86).", 79); OPM_LogWLn(); @@ -344,6 +346,8 @@ BOOLEAN OPM_OpenPar (void) OPM_LogWStr((CHAR*)" -A88 66 bit addresses, 64 bit alignment (e.g. 64 bit platforms).", 71); OPM_LogWLn(); OPM_LogWLn(); + OPM_LogWStr((CHAR*)"All options are off by default, except where noted above.", 58); + OPM_LogWLn(); OPM_LogWStr((CHAR*)"Initial options specify defaults for all files.", 48); OPM_LogWLn(); OPM_LogWStr((CHAR*)"Options following a filename are specific to that file.", 56); diff --git a/bootstrap/windows-88/OPM.h b/bootstrap/windows-88/OPM.h index e2737249..b1fab659 100644 --- a/bootstrap/windows-88/OPM.h +++ b/bootstrap/windows-88/OPM.h @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #ifndef OPM__h #define OPM__h diff --git a/bootstrap/windows-88/OPP.c b/bootstrap/windows-88/OPP.c index e9fcba89..8c85929d 100644 --- a/bootstrap/windows-88/OPP.c +++ b/bootstrap/windows-88/OPP.c @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #define INTEGER int32 #define LONGINT int64 diff --git a/bootstrap/windows-88/OPP.h b/bootstrap/windows-88/OPP.h index 6dd03161..28045a86 100644 --- a/bootstrap/windows-88/OPP.h +++ b/bootstrap/windows-88/OPP.h @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #ifndef OPP__h #define OPP__h diff --git a/bootstrap/windows-88/OPS.c b/bootstrap/windows-88/OPS.c index d79e207f..869dfa4b 100644 --- a/bootstrap/windows-88/OPS.c +++ b/bootstrap/windows-88/OPS.c @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin tspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin tspaSfF */ #define INTEGER int32 #define LONGINT int64 diff --git a/bootstrap/windows-88/OPS.h b/bootstrap/windows-88/OPS.h index 40853589..7de91cb4 100644 --- a/bootstrap/windows-88/OPS.h +++ b/bootstrap/windows-88/OPS.h @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin tspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin tspaSfF */ #ifndef OPS__h #define OPS__h diff --git a/bootstrap/windows-88/OPT.c b/bootstrap/windows-88/OPT.c index 63b773cd..2dd48c74 100644 --- a/bootstrap/windows-88/OPT.c +++ b/bootstrap/windows-88/OPT.c @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #define INTEGER int32 #define LONGINT int64 diff --git a/bootstrap/windows-88/OPT.h b/bootstrap/windows-88/OPT.h index 0cc86a01..a1956589 100644 --- a/bootstrap/windows-88/OPT.h +++ b/bootstrap/windows-88/OPT.h @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #ifndef OPT__h #define OPT__h diff --git a/bootstrap/windows-88/OPV.c b/bootstrap/windows-88/OPV.c index 8026831f..22d0def4 100644 --- a/bootstrap/windows-88/OPV.c +++ b/bootstrap/windows-88/OPV.c @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #define INTEGER int32 #define LONGINT int64 diff --git a/bootstrap/windows-88/OPV.h b/bootstrap/windows-88/OPV.h index a89aa61a..4a3f9d07 100644 --- a/bootstrap/windows-88/OPV.h +++ b/bootstrap/windows-88/OPV.h @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #ifndef OPV__h #define OPV__h diff --git a/bootstrap/windows-88/Platform.c b/bootstrap/windows-88/Platform.c index 0a24d4e9..6651ddd3 100644 --- a/bootstrap/windows-88/Platform.c +++ b/bootstrap/windows-88/Platform.c @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #define INTEGER int32 #define LONGINT int64 diff --git a/bootstrap/windows-88/Platform.h b/bootstrap/windows-88/Platform.h index 0c4c2127..8fd37cdd 100644 --- a/bootstrap/windows-88/Platform.h +++ b/bootstrap/windows-88/Platform.h @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #ifndef Platform__h #define Platform__h diff --git a/bootstrap/windows-88/Reals.c b/bootstrap/windows-88/Reals.c index f2623b03..039a3b6d 100644 --- a/bootstrap/windows-88/Reals.c +++ b/bootstrap/windows-88/Reals.c @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #define INTEGER int32 #define LONGINT int64 diff --git a/bootstrap/windows-88/Reals.h b/bootstrap/windows-88/Reals.h index 05b31bee..e27d5dca 100644 --- a/bootstrap/windows-88/Reals.h +++ b/bootstrap/windows-88/Reals.h @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #ifndef Reals__h #define Reals__h diff --git a/bootstrap/windows-88/Strings.c b/bootstrap/windows-88/Strings.c index 4226bdb9..2f1a7062 100644 --- a/bootstrap/windows-88/Strings.c +++ b/bootstrap/windows-88/Strings.c @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #define INTEGER int32 #define LONGINT int64 diff --git a/bootstrap/windows-88/Strings.h b/bootstrap/windows-88/Strings.h index b13ba079..90baacae 100644 --- a/bootstrap/windows-88/Strings.h +++ b/bootstrap/windows-88/Strings.h @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #ifndef Strings__h #define Strings__h diff --git a/bootstrap/windows-88/Texts.c b/bootstrap/windows-88/Texts.c index 4cdaa6b9..ee371c4e 100644 --- a/bootstrap/windows-88/Texts.c +++ b/bootstrap/windows-88/Texts.c @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #define INTEGER int32 #define LONGINT int64 diff --git a/bootstrap/windows-88/Texts.h b/bootstrap/windows-88/Texts.h index 10d0a9bb..32047663 100644 --- a/bootstrap/windows-88/Texts.h +++ b/bootstrap/windows-88/Texts.h @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #ifndef Texts__h #define Texts__h diff --git a/bootstrap/windows-88/Vishap.c b/bootstrap/windows-88/Vishap.c index e1d112ec..87812cc2 100644 --- a/bootstrap/windows-88/Vishap.c +++ b/bootstrap/windows-88/Vishap.c @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspamSf */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspamSf */ #define INTEGER int32 #define LONGINT int64 diff --git a/bootstrap/windows-88/errors.c b/bootstrap/windows-88/errors.c index ca898552..897999f4 100644 --- a/bootstrap/windows-88/errors.c +++ b/bootstrap/windows-88/errors.c @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #define INTEGER int32 #define LONGINT int64 diff --git a/bootstrap/windows-88/errors.h b/bootstrap/windows-88/errors.h index d574008d..6ca6c961 100644 --- a/bootstrap/windows-88/errors.h +++ b/bootstrap/windows-88/errors.h @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #ifndef errors__h #define errors__h diff --git a/bootstrap/windows-88/extTools.c b/bootstrap/windows-88/extTools.c index db3aec30..1647c4fe 100644 --- a/bootstrap/windows-88/extTools.c +++ b/bootstrap/windows-88/extTools.c @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #define INTEGER int32 #define LONGINT int64 diff --git a/bootstrap/windows-88/extTools.h b/bootstrap/windows-88/extTools.h index 847e440e..0b905427 100644 --- a/bootstrap/windows-88/extTools.h +++ b/bootstrap/windows-88/extTools.h @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #ifndef extTools__h #define extTools__h diff --git a/bootstrap/windows-88/vt100.c b/bootstrap/windows-88/vt100.c index ac832261..8b57066f 100644 --- a/bootstrap/windows-88/vt100.c +++ b/bootstrap/windows-88/vt100.c @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #define INTEGER int32 #define LONGINT int64 diff --git a/bootstrap/windows-88/vt100.h b/bootstrap/windows-88/vt100.h index 054f6ddd..e8809371 100644 --- a/bootstrap/windows-88/vt100.h +++ b/bootstrap/windows-88/vt100.h @@ -1,4 +1,4 @@ -/* voc 1.95 [2016/09/21] for gcc LP64 on cygwin xtspaSfF */ +/* voc 1.95 [2016/09/22] for gcc LP64 on cygwin xtspaSfF */ #ifndef vt100__h #define vt100__h diff --git a/src/compiler/OPM.cmdln.Mod b/src/compiler/OPM.cmdln.Mod index 33965ece..b3298aed 100644 --- a/src/compiler/OPM.cmdln.Mod +++ b/src/compiler/OPM.cmdln.Mod @@ -218,6 +218,9 @@ MODULE OPM; (* RC 6.3.89 / 28.6.89, J.Templ 10.7.89 / 22.7.96 *) (* Undocumented options used by the build system: + Todo - this is obsoleted by the -A and -O options. Remove when the build system + has been updated. + The following parameter overrides the integer size, pointer size and alignment settings compiled into the binary. They are used when bootstrapping to generate the C source for a compiler with different sizes to the current compiler. @@ -236,19 +239,22 @@ MODULE OPM; (* RC 6.3.89 / 28.6.89, J.Templ 10.7.89 / 22.7.96 *) BEGIN IF Platform.ArgCount = 1 THEN LogWLn; - LogWStr("Vishap Oberon-2 compiler v"); LogWStr(Configuration.versionLong); LogW("."); LogWLn; - LogWStr("Based on Ofront by Software Templ OEG, continued by Norayr Chilingarian and others."); LogWLn; + LogWStr("Oberon-2 compiler v"); LogWStr(Configuration.versionLong); LogW("."); LogWLn; + LogWStr("Based on Ofront by Software Templ OEG."); LogWLn; + LogWStr("Further development by Norayr Chilingarian, David Brown and others."); LogWLn; LogWLn; - LogWStr('Usage:'); LogWLn; LogWLn; - LogWStr(' '); LogWStr(Configuration.name); LogWStr(' options {files {options}}.'); LogWLn; LogWLn; - LogWStr('Where options = ["-" {option} ].'); LogWLn; + LogWStr("Usage:"); LogWLn; + LogWLn; + LogWStr(" "); LogWStr(Configuration.name); LogWStr(" options {files {options}}."); LogWLn; + LogWLn; + LogWStr('Where options = ["-" {option} ].'); LogWLn; LogWLn; LogWStr(" Run time safety"); LogWLn; - LogWStr(" -p Initialise pointers to NIL."); LogWLn; - LogWStr(" -a Halt on assertion failures."); LogWLn; + LogWStr(" -p Initialise pointers to NIL. On by default."); LogWLn; + LogWStr(" -a Halt on assertion failures. On by default."); LogWLn; LogWStr(" -r Halt on range check failures."); LogWLn; - LogWStr(" -t Halt on type guad failure."); LogWLn; - LogWStr(" -x Halt on index out of range."); LogWLn; + LogWStr(" -t Halt on type guard failure. On by default."); LogWLn; + LogWStr(" -x Halt on index out of range. On by default."); LogWLn; LogWLn; LogWStr(" Symbol file management"); LogWLn; LogWStr(" -e Allow extension of old symbol file."); LogWLn; @@ -265,19 +271,20 @@ MODULE OPM; (* RC 6.3.89 / 28.6.89, J.Templ 10.7.89 / 22.7.96 *) LogWStr(" -f Disable vt100 control characters in status output."); LogWLn; LogWStr(" -V Display compiler debugging messages."); LogWLn; LogWLn; - LogWStr(" Size model for elementary types"); LogWLn; - LogWStr(" -O2 Original Oberon / Oberon-2: 8 bit SHORTINT, 16 bit INTEGER, 32 bit LONGINT and SET."); LogWLn; - LogWStr(" -OC Component Pascal: 16 bit SHORTINT, 32 bit INTEGER, 64 bit LONGINT and SET."); LogWLn; - LogWStr(" -OV Alternate large model: 8 bit SHORTINT, 32 bit INTEGER, 64 bit LONGINT and SET."); LogWLn; + LogWStr(" Size model for elementary types (default O2 on 32 bit builds, OV on 64 bits)"); LogWLn; + LogWStr(" -O2 Original Oberon / Oberon-2: 8 bit SHORTINT, 16 bit INTEGER, 32 bit LONGINT and SET."); LogWLn; + LogWStr(" -OC Component Pascal: 16 bit SHORTINT, 32 bit INTEGER, 64 bit LONGINT and SET."); LogWLn; + LogWStr(" -OV Alternate large model: 8 bit SHORTINT, 32 bit INTEGER, 64 bit LONGINT and SET."); LogWLn; LogWLn; - LogWStr(" Target machine address size and alignment"); LogWLn; + LogWStr(" Target machine address size and alignment (default is that of the running compiler binary)"); LogWLn; LogWStr(" -A44 32 bit addresses, 32 bit alignment (e.g. Unix/linux 32 bit on x86)."); LogWLn; LogWStr(" -A48 32 bit addresses, 64 bit alignment (e.g. Windows 32 bit on x86, linux 32 bit on arm)."); LogWLn; LogWStr(" -A88 66 bit addresses, 64 bit alignment (e.g. 64 bit platforms)."); LogWLn; LogWLn; - LogWStr('Initial options specify defaults for all files.'); LogWLn; - LogWStr('Options following a filename are specific to that file.'); LogWLn; - LogWStr('Repeating an option toggles its value.'); LogWLn; + LogWStr("All options are off by default, except where noted above."); LogWLn; + LogWStr("Initial options specify defaults for all files."); LogWLn; + LogWStr("Options following a filename are specific to that file."); LogWLn; + LogWStr("Repeating an option toggles its value."); LogWLn; RETURN FALSE ELSE S:=1; s:=""; Platform.GetArg(S, s); @@ -577,17 +584,7 @@ MODULE OPM; (* RC 6.3.89 / 28.6.89, J.Templ 10.7.89 / 22.7.96 *) PROCEDURE VerboseListSizes; BEGIN LogWLn; - (*LogWStr("Type Size Alignement"); LogWLn;*) LogWStr("Type Size"); LogWLn; - (* - LogWStr("CHAR "); LogWNum(CharSize, 4); (* LogWNum(CharAlign, 5); *) LogWLn; - LogWStr("BOOLEAN "); LogWNum(BoolSize, 4); (* LogWNum(BoolAlign, 5); *) LogWLn; - LogWStr("REAL "); LogWNum(RealSize, 4); (* LogWNum(RealAlign, 5); *) LogWLn; - LogWStr("LONGREAL "); LogWNum(LRealSize, 4); (* LogWNum(LRealAlign, 5); *) LogWLn; - LogWStr("RECORD "); LogWNum(RecSize, 4); (* LogWNum(RecAlign, 5); *) LogWLn; - LogWStr("PROC "); LogWNum(ProcSize, 4); (* LogWNum(ProcAlign, 5); *) LogWLn; - LogWStr("ENDIAN "); LogWNum(ByteOrder, 4); LogWNum(BitOrder, 5); LogWLn; - *) LogWStr("SHORTINT "); LogWNum(ShortintSize, 4); (* LogWNum(SIntAlign, 5); *) LogWLn; LogWStr("INTEGER "); LogWNum(IntegerSize, 4); (* LogWNum(IntAlign, 5); *) LogWLn; LogWStr("LONGINT "); LogWNum(LongintSize, 4); (* LogWNum(LIntAlign, 5); *) LogWLn; @@ -595,13 +592,6 @@ MODULE OPM; (* RC 6.3.89 / 28.6.89, J.Templ 10.7.89 / 22.7.96 *) LogWStr("ADDRESS "); LogWNum(AddressSize, 4); (* LogWNum(PointerAlign, 5); *) LogWLn; LogWLn; LogWStr("Alignment: "); LogWNum(Alignment, 4); LogWLn; - (* - LogWStr("Min shortint "); LogWNum(MinSInt, 4); LogWLn; - LogWStr("Max shortint "); LogWNum(MaxSInt, 4); LogWLn; - LogWStr("Min integer "); LogWNum(MinInt, 4); LogWLn; - LogWStr("Max integer "); LogWNum(MaxInt, 4); LogWLn; - LogWStr("Min longint "); LogWNum(MinLInt, 4); LogWLn; - *) END VerboseListSizes; @@ -864,7 +854,6 @@ MODULE OPM; (* RC 6.3.89 / 28.6.89, J.Templ 10.7.89 / 22.7.96 *) BEGIN - Texts.OpenWriter(W); MODULES := ""; Platform.GetEnv("MODULES", MODULES); @@ -881,16 +870,18 @@ BEGIN (* type sizes with configuration based defaults *) AddressSize := Configuration.addressSize; Alignment := Configuration.alignment; - ShortintSize := 1; IF Configuration.intsize = 2 THEN - IntegerSize := 2; - LongintSize := 4; - SetSize := 4; + (* Original Oberon-2 implementation sizes (-O2) *) + ShortintSize := 1; + IntegerSize := 2; + LongintSize := 4; + SetSize := 4; ELSE - IntegerSize := 4; - LongintSize := 8; - SetSize := 8; - END; - + (* Legacy Vishap 64 bit build sizes (-OV) *) + ShortintSize := 1; + IntegerSize := 4; + LongintSize := 8; + SetSize := 8; + END END OPM.