Commit d72f4b74 authored by Stewart Brodie's avatar Stewart Brodie
Browse files

Added 32-bit flag to module header.

Detail:
  Also rearranged the header values a little so that the title shares
    with the SWI chunk name.
Admin:
  Built.

Version 2.31. Tagged as 'ScrBlank-2_31'
parent a67e950d
......@@ -6,9 +6,19 @@
GBLS Module_MinorVersion
GBLS Module_Date
GBLS Module_FullVersion
Module_MajorVersion SETS "2.30"
Module_Version SETA 230
GBLS Module_ApplicationDate2
GBLS Module_ApplicationDate4
GBLS Module_HelpVersion
GBLS Module_ComponentName
GBLS Module_ComponentPath
Module_MajorVersion SETS "2.31"
Module_Version SETA 231
Module_MinorVersion SETS ""
Module_Date SETS "15 May 2000"
Module_FullVersion SETS "2.30"
Module_Date SETS "21 Nov 2000"
Module_ApplicationDate2 SETS "21-Nov-00"
Module_ApplicationDate4 SETS "21-Nov-2000"
Module_ComponentName SETS "ScrBlank"
Module_ComponentPath SETS "RiscOS/Sources/Video/Render/ScrBlank"
Module_FullVersion SETS "2.31"
Module_HelpVersion SETS "2.31 (21 Nov 2000)"
END
/* (2.30)
/* (2.31)
*
* This file is automatically maintained by srccommit, do not edit manually.
*
*/
#define Module_MajorVersion_CMHG 2.30
#define Module_MajorVersion_CMHG 2.31
#define Module_MinorVersion_CMHG
#define Module_Date_CMHG 15 May 2000
#define Module_Date_CMHG 21 Nov 2000
#define Module_MajorVersion "2.30"
#define Module_Version 230
#define Module_MajorVersion "2.31"
#define Module_Version 231
#define Module_MinorVersion ""
#define Module_Date "15 May 2000"
#define Module_Date "21 Nov 2000"
#define Module_FullVersion "2.30"
#define Module_ApplicationDate2 "21-Nov-00"
#define Module_ApplicationDate4 "21-Nov-2000"
#define Module_ComponentName "ScrBlank"
#define Module_ComponentPath "RiscOS/Sources/Video/Render/ScrBlank"
#define Module_FullVersion "2.31"
#define Module_HelpVersion "2.31 (21 Nov 2000)"
......@@ -175,23 +175,23 @@ Module_BaseAddr
|
DCD 0
]
TitleStr DCB "ScreenBlanker", 0
ALIGN
HelpStr DCB "ScreenBlanker", 9, "$Module_MajorVersion ($Module_Date)"
[ "$Module_MinorVersion" <> ""
DCB " $Module_MinorVersion"
[ :LNOT: No32bitCode
DCD moduleflags - Module_BaseAddr
]
DCB 0
ALIGN
HelpStr DCB "ScreenBlanker", 9, "$Module_HelpVersion", 0
TitleStr
SWINames
DCB "ScreenBlanker",0 ; prefix
DCB "Control",0 ; 0
DCB 0
ALIGN
[ :LNOT: No32bitCode
moduleflags DCD ModuleFlag_32bit
]
SWIDecode
Push "LR"
LDR R12, [R12] ; get workspace
......
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