Commit 5ed206f6 authored by Robert Sprowson's avatar Robert Sprowson
Browse files

Changed to use objasm.

Version 0.39. Tagged as 'Obey-0_39'
parent e31ed3a8
......@@ -22,60 +22,8 @@
# 08-Jun-94 AMcC Created.
#
#
# Generic options:
#
MKDIR = cdir
AS = aasm
CP = copy
RM = remove
CCFLAGS = -c -depend !Depend -IC:
ASFLAGS = -depend !Depend -Stamp -quit -module -To $@ -From
CPFLAGS = ~cfr~v
TOKENISE = tokenise
TOKENS = Hdr:Tokens
#
# Program specific options:
#
COMPONENT = Obey
SOURCE = s.Obey
TARGET = rm.Obey
#
# Generic rules:
#
rom: $(TARGET)
@echo ${COMPONENT}: rom module built
export: ${EXPORTS}
@echo ${COMPONENT}: export complete
install_rom: $(TARGET)
$(CP) $(TARGET) $(INSTDIR).$(COMPONENT) $(CPFLAGS)
@echo ${COMPONENT}: rom module installed
clean:
$(RM) $(TARGET)
@echo ${COMPONENT}: cleaned
resources: resources-${CMDHELP}
@echo ${COMPONENT}: resource files copied
resources_common:
${MKDIR} ${RESDIR}.${COMPONENT}
TokenCheck LocalRes:Messages
${CP} LocalRes:Messages ${RESDIR}.${COMPONENT}.Messages ${CPFLAGS}
resources-None: resources_common
@
resources-: resources_common
TokenCheck LocalRes:CmdHelp
print LocalRes:CmdHelp { >> ${RESDIR}.${COMPONENT}.Messages }
$(TARGET): $(SOURCE)
$(AS) $(ASFLAGS) $(SOURCE)
COMPONENT ?= Obey
RESOURCES = yes
# Dynamic dependencies:
include StdTools
include AAsmModule
......@@ -11,13 +11,13 @@
GBLS Module_HelpVersion
GBLS Module_ComponentName
GBLS Module_ComponentPath
Module_MajorVersion SETS "0.38"
Module_Version SETA 38
Module_MajorVersion SETS "0.39"
Module_Version SETA 39
Module_MinorVersion SETS ""
Module_Date SETS "15 Nov 2002"
Module_ApplicationDate SETS "15-Nov-02"
Module_Date SETS "26 Jun 2003"
Module_ApplicationDate SETS "26-Jun-03"
Module_ComponentName SETS "Obey"
Module_ComponentPath SETS "RiscOS/Sources/Programmer/Obey"
Module_FullVersion SETS "0.38"
Module_HelpVersion SETS "0.38 (15 Nov 2002)"
Module_FullVersion SETS "0.39"
Module_HelpVersion SETS "0.39 (26 Jun 2003)"
END
/* (0.38)
/* (0.39)
*
* This file is automatically maintained by srccommit, do not edit manually.
* Last processed by srccommit version: 1.68.
*
*/
#define Module_MajorVersion_CMHG 0.38
#define Module_MajorVersion_CMHG 0.39
#define Module_MinorVersion_CMHG
#define Module_Date_CMHG 15 Nov 2002
#define Module_Date_CMHG 26 Jun 2003
#define Module_MajorVersion "0.38"
#define Module_Version 38
#define Module_MajorVersion "0.39"
#define Module_Version 39
#define Module_MinorVersion ""
#define Module_Date "15 Nov 2002"
#define Module_Date "26 Jun 2003"
#define Module_ApplicationDate "15-Nov-02"
#define Module_ApplicationDate "26-Jun-03"
#define Module_ComponentName "Obey"
#define Module_ComponentPath "RiscOS/Sources/Programmer/Obey"
#define Module_FullVersion "0.38"
#define Module_HelpVersion "0.38 (15 Nov 2002)"
#define Module_LibraryVersionInfo "0:38"
#define Module_FullVersion "0.39"
#define Module_HelpVersion "0.39 (26 Jun 2003)"
#define Module_LibraryVersionInfo "0:39"
......@@ -51,6 +51,8 @@
;; 05-Aug-99 0.36 Ursula long command and service call tables merged.
;;----------------------------------------------------------------------------
AREA |Obey$$Code|, CODE, READONLY, PIC
Module_BaseAddr
GET hdr:ListOpts
......@@ -1055,7 +1057,7 @@ returntocaller
[ No32bitCode
Push "r0-r3,pc" ; preserve flags (V bit in particular)
|
mrs ,r14, CPSR
MRS r14, CPSR
Push "r0-r3,r14"
]
MOV r0, #ExitHandler
......@@ -1070,7 +1072,7 @@ returntocaller
[ No32bitCode
TEQP r7,#0 ; restore V bit
|
msr ,CPSR_f, r7
MSR CPSR_f, r7
]
Pull "R7-R11,PC" ; return to caller (I hope!)
......
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