Commit c10a3a57 authored by Robert Sprowson's avatar Robert Sprowson Committed by ROOL
Browse files

Use symbolic names for DA operations

parent 1bce8e2c
......@@ -1390,7 +1390,7 @@ TryGrowDirBuf ROUT
DREG R4,"entry TryGrowDirBuf - need: "
]
; because DA size may be rounded up to a page, we read the real size here
MOV R0, #2 ; read area size
MOV R0, #DAReason_GetInfo
LDR R1, DirBufferArea ; area addr
BL OnlyXOS_DynamicArea ; do the SWI call
BVS %FT95
......
......@@ -2580,7 +2580,7 @@ DismountDisc
; get rid of any free space map area
Push "R0-R8"
MOV R0, #2
MOV R0, #DAReason_GetInfo
LDR R1, [R2, #DrvsFsMapArea]
BL OnlyXOS_DynamicArea
BVS %FT01 ; if error, then do nothing
......
......@@ -41,6 +41,7 @@ GetHAL SETS ""
GET Hdr:FileTypes
GET Hdr:OsWords
GET Hdr:OsBytes
GET Hdr:OSMem
GET Hdr:MultiFS
GET Hdr:NewErrors
GET Hdr:Territory
......
......@@ -1185,7 +1185,7 @@ AdjustFsSpace ROUT
Push "R1, R3-r8"
MOV R0, #2
MOV R0, #DAReason_GetInfo
LDR R1, [R4, #DrvsFsMapArea]
BL OnlyXOS_DynamicArea ; get the dynamic area size in bytes
......@@ -1615,7 +1615,7 @@ StartupNonFileCoreDisc ROUT
STR R1, [R4, #DrvsFsMapSize] ; so that if we have problems, we assume no map allocated
LDR R1, [R4, #DrvsFsMapArea]
MOV R0, #2
MOV R0, #DAReason_GetInfo
Push "R3-R8"
......
......@@ -374,7 +374,7 @@ FindBuffer ROUT
; Grow dynamic area (will probably leave us with more space than we
; need, but will avoid us claiming all the spare heap space and causing
; issues for background claimants)
MOV R0, #1
MOV R0, #ChangeDyn_RMA
[ DebugD
DREG R1, "trying to grow RMA by "
]
......
......@@ -314,7 +314,7 @@ InitEntry ROUT ; NO REENTRANCY CHECK NEEDED
BL InitialiseHardware
;check location of System Heap
MOV R0, #0
MOV R0, #ChangeDyn_SysHeap
SWI XOS_ReadDynamicArea
LDRVS R0, =&01C02000
STR R0, SysHeapStart
......@@ -425,7 +425,7 @@ InitEntry ROUT ; NO REENTRANCY CHECK NEEDED
Push "R1,R2,R4-R8"
MOV R0, #0 ; create
MOV R0, #DAReason_Create
MOV R1, #-1 ; don't care about the number
MOV R2, #0 ; initial size of area
MOV R3, #-1 ; don't care about the base
......@@ -522,7 +522,7 @@ InitEntry ROUT ; NO REENTRANCY CHECK NEEDED
B %FT85
01
MOV R0, #0 ; create
MOV R0, #DAReason_Create
MOV R1, #-1 ; don't care about the number
MOV R2, #BigDirMinSize ; initial size of area
STR R2, DirBufferSize ; store the size
......@@ -645,7 +645,7 @@ DieEntry
[ BigDir
; free the dynamic area for the dir buffer
MOV R0, #1
MOV R0, #DAReason_Remove
LDR R1, DirBufferArea
TEQS R1, #0
[ Debug1
......@@ -669,7 +669,7 @@ DieEntry
93
DrvRecPtr R2,R4
[ DynamicMaps
MOV R0, #1
MOV R0, #DAReason_Remove
LDR R1, [R2, #DrvsFsMapArea]
TEQS R1, #0
[ Debug1
......
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