Commit 2f2dcda2 authored by Robert Sprowson's avatar Robert Sprowson
Browse files

Expand tabs.

parent 279d6cb0
......@@ -44,7 +44,7 @@ Helpstr DCB "Filter Manager",9,"$Module_HelpVersion"
[ standalone
= " (Standalone)"
]
DCB 0
DCB 0
ALIGN
; ----------------------------------------------------------------------------------------------------------------------
......@@ -52,7 +52,7 @@ prefilter_token DCB "PreFT",0
postfilter_token DCB "PostFT",0
rectfilter_token DCB "RectFT",0
copyfilter_token DCB "CopyFT",0
postrectfilter_token DCB "PostRectFT",0
postrectfilter_token DCB "PostRectFT",0
posticonfilter_token DCB "PostIconFT",0
filter_token DCB "Filter",0
task_token DCB "Task",0
......@@ -150,7 +150,7 @@ Filters_Code
SWINE XTaskManager_TaskNameFromHandle
BVS %FT05
MOV r1, r6
BL writefield
BL writefield
SWI XOS_NewLine
BVS %FT05
......@@ -226,8 +226,8 @@ Filters_Code
CMP r3, #0
BNE %BT03
SWI XOS_NewLine
BVS %FT05
SWI XOS_NewLine
BVS %FT05
ADRL r1, rectfilter_token
MOV r2, #0
......@@ -281,7 +281,7 @@ Filters_Code
BNE %BT10
SWI XOS_NewLine
BVS %FT05
BVS %FT05
ADRL r1, postrectfilter_token
MOV r2, #0
......@@ -335,7 +335,7 @@ Filters_Code
BNE %BT30
SWI XOS_NewLine
BVS %FT05
BVS %FT05
ADRL r1, posticonfilter_token
......@@ -390,7 +390,7 @@ Filters_Code
BNE %BT40
SWI XOS_NewLine
BVS %FT05
BVS %FT05
ADRL r1, copyfilter_token
......@@ -464,7 +464,7 @@ writefield
; Out: r0,r2 corrupted
Push "lr"
MOV r2, r0
BL Write32
BL Write32
Pull "pc",VS
SUB r0, r0, r2
SUB r0, r1, r0
......@@ -482,15 +482,15 @@ Write32
Push "R1,R2,LR"
;
SUB R1,R1,#min_gap
MOV R2,R0
01 LDRB R0,[R2],#1
CMP R0,#32
SUBHSS R1,R1,#1
MOVLO R0,R2
Pull "R1,R2,PC",LO
SWI XOS_WriteC
BVC %BT01
Pull "R1,R2,PC"
MOV R2,R0
01 LDRB R0,[R2],#1
CMP R0,#32
SUBHSS R1,R1,#1
MOVLO R0,R2
Pull "R1,R2,PC",LO
SWI XOS_WriteC
BVC %BT01
Pull "R1,R2,PC"
writefield_dashed
; Write dashes for the length of the given control-terminated string, and pad with spaces to field width
......@@ -502,7 +502,7 @@ writefield_dashed
01
LDRB lr, [r0], #1
CMP lr, #32
SWIHS XOS_WriteI+"-"
SWIHS XOS_WriteI+"-"
Pull "pc",VS
BHS %BT01
SUB r0, r0, r2
......@@ -557,33 +557,33 @@ Init
STR r0, pre_filters
STR r0, post_filters
STR r0, rect_filters
STR r0, copy_filters
STR r0, post_rect_filters
STR r0, post_icon_filters
STR r0, copy_filters
STR r0, post_rect_filters
STR r0, post_icon_filters
STR r0, flags ; Clear flags.
[ No26bitCode
STR r0, fake_postrect
]
; If we're on a Wimp earlier than 3.86, then we need to fake post-rectangle filters
MOV r0, #7
SWI Wimp_ReadSysInfo
SUB r0, r0, #256
MOV r0, #7
SWI Wimp_ReadSysInfo
SUB r0, r0, #256
[ :LNOT: No26bitCode
CMP r0, #386-256
MOVLT r1, #1
MOVGE r1, #0
STR r1, fake_postrect
CMP r0, #386-256
MOVLT r1, #1
MOVGE r1, #0
STR r1, fake_postrect
]
; If we're on a Wimp earlier than 3.99, then we cannot rely on getting handles from r10
CMP r0, #399-256
MOVLT r1, #0
MOVGE r1, #1
STR r1, get_handle_from_r10
CMP r0, #399-256
MOVLT r1, #0
MOVGE r1, #1
STR r1, get_handle_from_r10
[ standalone
BL declareresourcefsfiles
]
[ standalone
BL declareresourcefsfiles
]
ADR R0,servicecallback
MOV R1,WP ; workspace pointer
......@@ -628,7 +628,7 @@ Service
MOV R0, R0 ; flag service table to aware kernels
TEQ R1,#Service_WimpRegisterFilters
[ standalone
TEQNE R1,#Service_ResourceFSStarting
TEQNE R1,#Service_ResourceFSStarting
]
MOVNE PC,LR
Service2
......@@ -653,10 +653,10 @@ RegisterFilters
Push "r0-r2,LR"
[ :LNOT: No26bitCode
LDR LR,fake_postrect
TEQ LR,#0
MOVNE R0,#0
STRNE R0,int_get_rectangle_reentry_addr
LDR LR,fake_postrect
TEQ LR,#0
MOVNE R0,#0
STRNE R0,int_get_rectangle_reentry_addr
]
LDR LR,pre_filters
......@@ -671,18 +671,18 @@ RegisterFilters
DebugE register,"Cant register pre-filter "
ADDVS r13,r13,#4
ADDVS r13,r13,#4
Pull "r1-r2,PC",VS
LDR LR,rect_filters
CMP LR,#0 ; Any rect-filters?
BNE %FT01
BNE %FT01
LDR LR,post_rect_filters
CMP LR,#0 ; how about post-rect-filters?
BEQ %FT02
LDR LR,fake_postrect
CMP LR,#0
LDR LR,post_rect_filters
CMP LR,#0 ; how about post-rect-filters?
BEQ %FT02
LDR LR,fake_postrect
CMP LR,#0
01 MOVNE R0,#3 ; rect_filter
ADRNEL R1,rect_filter_handler
......@@ -694,7 +694,7 @@ RegisterFilters
DebugE register,"Cant register rect-filter "
ADDVS r13,r13,#4
ADDVS r13,r13,#4
Pull "r1-r2,PC",VS
02 LDR LR,copy_filters
......@@ -709,7 +709,7 @@ RegisterFilters
DebugE register,"Cant register copy-filter "
ADDVS r13,r13,#4
ADDVS r13,r13,#4
Pull "r1-r2,PC",VS
LDR LR,post_filters
......@@ -724,7 +724,7 @@ RegisterFilters
DebugE register,"Cant register post-filter "
ADDVS r13,r13,#4
ADDVS r13,r13,#4
Pull "r1-r2,PC",VS
LDR LR,post_icon_filters
......@@ -739,25 +739,25 @@ RegisterFilters
DebugE register,"Cant register post-icon-filter "
ADDVS r13,r13,#4
ADDVS r13,r13,#4
Pull "r1-r2,PC",VS
LDR LR,fake_postrect
TEQ LR,#0
Pull "r0-r2,PC",NE
LDR LR,fake_postrect
TEQ LR,#0
Pull "r0-r2,PC",NE
LDR LR,post_rect_filters
CMP LR,#0 ; Any post-rect-filters?
MOVNE R0,#4 ; post_rect_filter
ADRNEL R1,post_rect_filter_handler
MOVNE R2,R12
LDR LR,post_rect_filters
CMP LR,#0 ; Any post-rect-filters?
MOVNE R0,#4 ; post_rect_filter
ADRNEL R1,post_rect_filter_handler
MOVNE R2,R12
Debug register,"Register post-rect-filter",R0,R1,R2,LR
SWINE XWimp_RegisterFilter
STRVS r0,[r13]
SWINE XWimp_RegisterFilter
STRVS r0,[r13]
DebugE register,"Can't register post-rect-filter "
DebugE register,"Can't register post-rect-filter "
Pull "r0-r2,LR"
RETURNVC
......
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