......@@ -23,23 +23,6 @@
; Header file for the riscos veneer.
;
GBLS VeneerName ;The name of the veneer to use
VeneerName SETS "riscos"
GBLS CoreDir
CoreDir SETS "^.coresrc.s." ;RISC OS uses "." as the directory
; separator character
GBLS VeneerDir
VeneerDir SETS "^.vensrc.$VeneerName.."
;NB first "." after "$VeneerName"
; terminates the variable name, the
; second is the directory separator
GBLS FileExt
FileExt SETS "" ;RISC OS doesn't use filename
; extensions
;
; Controls for veneer sources
;
......
......@@ -23,23 +23,6 @@
; Header file for the riscos veneer.
;
GBLS VeneerName ;The name of the veneer to use
VeneerName SETS "riscos"
GBLS CoreDir
CoreDir SETS "^.coresrc.s." ;RISC OS uses "." as the directory
; separator character
GBLS VeneerDir
VeneerDir SETS "^.vensrc.$VeneerName.."
;NB first "." after "$VeneerName"
; terminates the variable name, the
; second is the directory separator
GBLS FileExt
FileExt SETS "" ;RISC OS doesn't use filename
; extensions
;
; Controls for veneer sources
;
......
......@@ -23,23 +23,6 @@
; Header file for the riscos veneer.
;
GBLS VeneerName ;The name of the veneer to use
VeneerName SETS "riscos"
GBLS CoreDir
CoreDir SETS "^.coresrc.s." ;RISC OS uses "." as the directory
; separator character
GBLS VeneerDir
VeneerDir SETS "^.vensrc.$VeneerName.."
;NB first "." after "$VeneerName"
; terminates the variable name, the
; second is the directory separator
GBLS FileExt
FileExt SETS "" ;RISC OS doesn't use filename
; extensions
;
; Controls for veneer sources
;
......
......@@ -23,23 +23,6 @@
; Header file for the riscos veneer.
;
GBLS VeneerName ;The name of the veneer to use
VeneerName SETS "riscos"
GBLS CoreDir
CoreDir SETS "^.coresrc.s." ;RISC OS uses "." as the directory
; separator character
GBLS VeneerDir
VeneerDir SETS "^.vensrc.$VeneerName.."
;NB first "." after "$VeneerName"
; terminates the variable name, the
; second is the directory separator
GBLS FileExt
FileExt SETS "" ;RISC OS doesn't use filename
; extensions
;
; Controls for veneer sources
;
......
......@@ -23,23 +23,6 @@
; Header file for the riscos veneer.
;
GBLS VeneerName ;The name of the veneer to use
VeneerName SETS "riscos"
GBLS CoreDir
CoreDir SETS "^.coresrc.s." ;RISC OS uses "." as the directory
; separator character
GBLS VeneerDir
VeneerDir SETS "^.vensrc.$VeneerName.."
;NB first "." after "$VeneerName"
; terminates the variable name, the
; second is the directory separator
GBLS FileExt
FileExt SETS "" ;RISC OS doesn't use filename
; extensions
;
; Controls for veneer sources
;
......
......@@ -29,8 +29,8 @@ XMessageTrans_ErrorLookup * &61506
GET Services
GET ModHand
GET EnvNumbers
GET $VeneerDir.FPEMacros
GET $VeneerDir.^.^.VersionASM
GET $VeneerDir.FPEMacros$FileExt
GET VersionASM
GET PublicWS
GET OSRSI6
......
......@@ -129,13 +129,13 @@ SWIJumpTable
EndOfSWIJumpTable
UnknownSWIError
STMFD sp!,{r0-r2,r4,lr}
STMFD sp!,{r1-r2,r4,lr}
ADR r0, BadSWIToken
MOV r1, #0
MOV r2, #0
ADR r4, FPETitle
SWI XMessageTrans_ErrorLookup
LDMFD sp!,{r0-r2,r4,pc}
LDMFD sp!,{r1-r2,r4,pc}
FPESWI_Version
LDR r0, =Module_Version
......