Commit 1d5721d2 authored by Kevin Bracey's avatar Kevin Bracey
Browse files

32-bit compatible.

Version 5.32. Tagged as 'Internet-5_32'
parent 39d52ee5
...@@ -74,10 +74,10 @@ Div2 CMPS R0,R3 ...@@ -74,10 +74,10 @@ Div2 CMPS R0,R3
MOV R3,R3,LSR #1 MOV R3,R3,LSR #1
CMPS R3,R1 CMPS R3,R1
BHS Div2 BHS Div2
MOV R0,R2 ADDS R0,R2,#0 ; clear V
LDMFD R13!,{R1-R3} LDMFD R13!,{R1-R3}
MOVS PC,LR MOV PC,LR
= "CheckMem 1.00 (23 May 1996) Acorn Computers Ltd 1996" = "CheckMem 1.01 (27 Apr 2000)"
END END
...@@ -36,6 +36,7 @@ XOS_Write0 * &20002 ...@@ -36,6 +36,7 @@ XOS_Write0 * &20002
XOS_NewLine * &20003 XOS_NewLine * &20003
XOS_CLI * &20005 XOS_CLI * &20005
XOS_Module * &2001E XOS_Module * &2001E
XOS_GenerateError * &2002B
XOS_ConvertHex8 * &200D4 XOS_ConvertHex8 * &200D4
XOS_ConvertInteger4 * &200DC XOS_ConvertInteger4 * &200DC
...@@ -101,8 +102,8 @@ RMFind ...@@ -101,8 +102,8 @@ RMFind
SyntaxError SyntaxError
ADR R0,SyntaxErrorBlock ADR R0,SyntaxErrorBlock
LDMFD R13!,{LR} SWI XOS_GenerateError
ORRS PC,LR,#V LDMFD R13!,{PC}
SyntaxErrorBlock SyntaxErrorBlock
& &DC & &DC
...@@ -193,7 +194,7 @@ NotLoaded ...@@ -193,7 +194,7 @@ NotLoaded
MOV R1,#0 MOV R1,#0
MVN R2,#0 MVN R2,#0
20 SWI XOS_Module 20 SWI XOS_Module
LDMVSFD R13!,{PC}^ BVS %F29
BL CmpNam BL CmpNam
BNE %B20 BNE %B20
TEQS R4,#0 TEQS R4,#0
...@@ -225,6 +226,9 @@ NotLoaded ...@@ -225,6 +226,9 @@ NotLoaded
LDMFD R13!,{R0-R2} LDMFD R13!,{R0-R2}
B %B20 B %B20
29 ADDS R0,R0,#0 ; clear V
LDMFD R13!,{PC}
ROUT ROUT
CmpNam CmpNam
STMFD R13!,{R0-R3} STMFD R13!,{R0-R3}
...@@ -309,8 +313,8 @@ ConvertVersion ...@@ -309,8 +313,8 @@ ConvertVersion
SWI XOS_Write0 SWI XOS_Write0
MOV R0,LR MOV R0,LR
] ]
LDMFD R13!,{R1-R3,PC}^ LDMFD R13!,{R1-R3,PC}
= "RMFind 1.01 (05 Jul 1996) Acorn Computers Ltd 1996" = "RMFind 1.02 (27 Apr 2000)"
END END
...@@ -48,12 +48,12 @@ ReadCMOSIP ...@@ -48,12 +48,12 @@ ReadCMOSIP
; If the address is 0.0.0.0 don't do anything ; If the address is 0.0.0.0 don't do anything
; If it's 0.0.0.x then treat as 10.0.0.x ; If it's 0.0.0.x then treat as 10.0.0.x
TEQS R4,#0 CMPS R4,#0 ; clears V
TEQEQS R5,#0 TEQEQS R5,#0
TEQEQS R6,#0 TEQEQS R6,#0
MOVEQ R4,#10 MOVEQ R4,#10
TEQEQS R7,#0 TEQEQS R7,#0
MOVEQS PC,LR MOVEQ PC,LR
MOV R0,R4 MOV R0,R4
MOV R1,R12 MOV R1,R12
...@@ -90,6 +90,6 @@ ReadCMOSIP ...@@ -90,6 +90,6 @@ ReadCMOSIP
VarName VarName
= "Inet$CMOSIPAddr", 0 = "Inet$CMOSIPAddr", 0
= "ReadCMOSIP 1.00 (02 Jul 1996) Acorn Computers Ltd 1996" = "ReadCMOSIP 1.01 (27 Apr 2000)"
END END
...@@ -31,8 +31,8 @@ TriggerCBs ...@@ -31,8 +31,8 @@ TriggerCBs
SWI XOS_Byte SWI XOS_Byte
SUBS R5,R5,#1 SUBS R5,R5,#1
BNE %B0 BNE %B0
MOVS PC,LR MOV PC,LR
= "TriggerCBs 1.00 (30 May 1996) © Acorn Computers Ltd 1996" = "TriggerCBs 1.01 (27 Apr 2000)"
END END
...@@ -48,6 +48,6 @@ XLoop ...@@ -48,6 +48,6 @@ XLoop
XError XError
= "X$Error", 0 = "X$Error", 0
XVersionInfo XVersionInfo
= "X 1.01 (09 Mar 2000) Pace Micro Technology plc, 2000", 0 = "X 1.02 (27 Apr 2000)"
END END
/* (5.31) /* (5.32)
* *
* This file is automatically maintained by srccommit, do not edit manually. * This file is automatically maintained by srccommit, do not edit manually.
* *
*/ */
#define Module_MajorVersion_CMHG 5.31 #define Module_MajorVersion_CMHG 5.32
#define Module_MinorVersion_CMHG #define Module_MinorVersion_CMHG
#define Module_Date_CMHG 09 Mar 2000 #define Module_Date_CMHG 12 May 2000
#define Module_MajorVersion "5.31" #define Module_MajorVersion "5.32"
#define Module_Version 531 #define Module_Version 532
#define Module_MinorVersion "" #define Module_MinorVersion ""
#define Module_Date "09 Mar 2000" #define Module_Date "12 May 2000"
#define Module_FullVersion "5.31" #define Module_FullVersion "5.32"
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