Commit b7877e1f authored by Jeffrey Lee's avatar Jeffrey Lee Committed by ROOL
Browse files

Fix multi-parameter messages

Incorrect stack offsets caused multi-parameter messages to use the wrong
parameter values, e.g. "HELP" reporting incorrect program size and free
memory values.

Version 1.79. Tagged as 'BASIC-1_79'
parent 43eba9c9
......@@ -9,12 +9,12 @@
GBLS Module_ApplicationDate
GBLS Module_HelpVersion
GBLS Module_ComponentName
Module_MajorVersion SETS "1.78"
Module_Version SETA 178
Module_MajorVersion SETS "1.79"
Module_Version SETA 179
Module_MinorVersion SETS ""
Module_Date SETS "17 Dec 2019"
Module_ApplicationDate SETS "17-Dec-19"
Module_Date SETS "29 Feb 2020"
Module_ApplicationDate SETS "29-Feb-20"
Module_ComponentName SETS "BASIC"
Module_FullVersion SETS "1.78"
Module_HelpVersion SETS "1.78 (17 Dec 2019)"
Module_FullVersion SETS "1.79"
Module_HelpVersion SETS "1.79 (29 Feb 2020)"
END
/* (1.78)
/* (1.79)
*
* This file is automatically maintained by srccommit, do not edit manually.
*
*/
#define Module_MajorVersion_CMHG 1.78
#define Module_MajorVersion_CMHG 1.79
#define Module_MinorVersion_CMHG
#define Module_Date_CMHG 17 Dec 2019
#define Module_Date_CMHG 29 Feb 2020
#define Module_MajorVersion "1.78"
#define Module_Version 178
#define Module_MajorVersion "1.79"
#define Module_Version 179
#define Module_MinorVersion ""
#define Module_Date "17 Dec 2019"
#define Module_Date "29 Feb 2020"
#define Module_ApplicationDate "17-Dec-19"
#define Module_ApplicationDate "29-Feb-20"
#define Module_ComponentName "BASIC"
#define Module_FullVersion "1.78"
#define Module_HelpVersion "1.78 (17 Dec 2019)"
#define Module_LibraryVersionInfo "1:78"
#define Module_FullVersion "1.79"
#define Module_HelpVersion "1.79 (29 Feb 2020)"
#define Module_LibraryVersionInfo "1:79"
......@@ -75,11 +75,11 @@ MSGPRNCCC ;three cardinal args, 0 unused
ADD R1,SP,#0
SWI OS_ConvertCardinal4
MOV R4,R0
LDR R0,[SP,#(12*3)+(0*4)] ;recover entry R2
LDR R0,[SP,#(12*3)+(1*4)] ;recover entry R2
ADD R1,SP,#12
SWI OS_ConvertCardinal4
MOV R5,R0
LDR R0,[SP,#(12*3)+(1*4)] ;recover entry R3
LDR R0,[SP,#(12*3)+(2*4)] ;recover entry R3
ADD R1,SP,#24
SWI OS_ConvertCardinal4
MOV R6,R0
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment