# HG changeset patch
# User Christian Brabandt <cb@256bit.org>
# Date 1490904006 -7200
# Node ID abc08a2461eae382e8181f1ecb1ef814f72fbf47
# Parent  6f5839eb3cbc17cde954484c9dc2c2167cd3333f
patch 8.0.0527: leftover file from RISC OS

commit https://github.com/vim/vim/commit/ce5c2742012e4793cb4cf82791e849f817fecd95
Author: Bram Moolenaar <Bram@vim.org>
Date:   Thu Mar 30 21:51:31 2017 +0200

    patch 8.0.0527: leftover file from RISC OS

    Problem:    RISC OS support was removed long ago, but one file is still
                included.
    Solution:   Delete the file. (Thomas Dziedzic, closes #1603)

diff --git a/Filelist b/Filelist
--- a/Filelist
+++ b/Filelist
@@ -725,7 +725,6 @@ EXTRA =		\
 		farsi/README.txt \
 		farsi/fonts/*/far-* \
 		runtime/vimlogo.xpm \
-		src/swis.s \
 		src/tee/Makefile \
 		src/tee/Make_mvc.mak \
 		src/tee/tee.c \
diff --git a/src/swis.s b/src/swis.s
deleted file mode 100644
--- a/src/swis.s
+++ /dev/null
@@ -1,143 +0,0 @@
-; Thomas Leonard
-; 24/5/98
-
-ar0	rn	0
-ar1	rn	1
-ar2	rn	2
-ar3	rn	3
-ar4	rn	4
-ar5	rn	5
-ar6	rn	6
-ar7	rn	7
-ar10	rn	10
-ar11	rn	11
-lk	rn	14
-ar15	rn	15
-
-	AREA	DATA
-	align	4
-
-	export	|r0|
-r0:	dcd	0
-
-	export	|r1|
-r1:	dcd	0
-
-	export	|r2|
-r2:	dcd	0
-
-	export	|r3|
-r3:	dcd	0
-
-	export	|r4|
-r4:	dcd	0
-
-	export	|r5|
-r5:	dcd	0
-
-	export	|r6|
-r6:	dcd	0
-
-	export	|r7|
-r7:	dcd	0
-
-	export	|time_of_last_poll|
-time_of_last_poll:  dcd	0
-
-	AREA	CODE, READONLY
-	align 4
-	import	|r0|
-	export	|swi|
-	=	"swi"
-	align 4
-swi:
-	; r0 = swi number
-	stmfd	sp!,{ar4-ar10,lk}
-	orr	ar10,ar0,#1<<17		;always use the X form
-	mov	ar0,ar1
-	mov	ar1,ar2
-	mov	ar2,ar3
-	add	ar3,sp,#4*8
-	ldmia	ar3,{ar3-ar7}
-	swi	0x6f		; OS_CallASWI
-	ldr	ar10,regs_addr
-	stmia	ar10,{ar0-ar7}
-	ldmvcfd	sp!,{ar4-ar10,pc}^
-	; report the error and quit on Cancel
-	mov	r1,#0x17
-	adr	r2,s_title
-	swi	0x400df		; Wimp_ReportError
-	cmp	r1,#1			;OK selected?
-	ldmeqfd	sp!,{ar4-ar10,pc}^	;yes - try to continue
-	swi	0x11			;no  - die (OS_Exit)
-s_title:
-	= "Nasty error - Cancel to quit"
-	= 0
-
-	align 4
-	export	|xswi|
-	=	"xswi"
-	align 4
-xswi:
-	; r0 = swi number
-	stmfd	sp!,{ar4-ar10,lk}
-	orr	ar10,ar0,#1<<17		;always use the X form
-	mov	ar0,ar1
-	mov	ar1,ar2
-	mov	ar2,ar3
-	add	ar3,sp,#4*8
-	ldmia	ar3,{ar3-ar7}
-	swi	0x6f		; OS_CallASWI
-	ldr	ar10,regs_addr
-	stmia	ar10,{ar0-ar7}
-	mov	ar0,#0
-	orr	ar0,ar0,ar15
-	ldmfd	sp!,{ar4-ar10,pc}^
-
-regs_addr:
-	dcd	r0
-
-	; The Wimp_Poll swis have to be done specially because,
-	; for some reason, r13 sometimes gets corrupted by Wimp_Poll
-	; (eg when running FileFind)
-	AREA	CODE, READONLY
-	align 4
-	import  |time_of_last_poll|
-	export	|wimp_poll|
-	=	"wimp_poll"
-	align 4
-wimp_poll:
-	mov	ar3,sp
-	swi	0x400c7		; Wimp_Poll
-	mov	sp,ar3
-
-	mov	ar3,ar0
-	swi	0x42		; OS_ReadMonotonicTime
-	ldr	ar2,addr_time
-	str	ar0,[ar2]
-	mov	ar0,ar3
-
-	mov	ar2,#0
-	wfs	ar2		; Write floating point status. Needed?
-	movs	pc,lk
-
-	align 4
-	export	|wimp_pollidle|
-	=	"wimp_pollidle"
-	align 4
-wimp_pollidle:
-	mov	ar3,sp
-	swi	0x400e1		; Wimp_PollIdle
-	mov	sp,ar3
-
-	mov	ar3,ar0
-	swi	0x42		; OS_ReadMonotonicTime
-	ldr	ar2,addr_time
-	str	ar0,[ar2]
-	mov	ar0,ar3
-
-	mov	ar2,#0
-	wfs	ar2		; Write floating point status. Needed?
-	movs	pc,lk
-
-addr_time: dcd	time_of_last_poll
diff --git a/src/version.c b/src/version.c
--- a/src/version.c
+++ b/src/version.c
@@ -765,6 +765,8 @@ static char *(features[]) =
 static int included_patches[] =
 {   /* Add new patch number below this line */
 /**/
+    527,
+/**/
     526,
 /**/
     525,