Patch 8.0.0527
Problem: RISC OS support was removed long ago, but one file is still
included.
Solution: Delete the file. (Thomas Dziedzic, closes #1603)
Files: Filelist, src/swis.s
*** ../vim-8.0.0526/Filelist 2017-03-25 14:50:37.925991956 +0100
--- Filelist 2017-03-30 21:49:09.339688921 +0200
***************
*** 725,731 ****
farsi/README.txt \
farsi/fonts/*/far-* \
runtime/vimlogo.xpm \
- src/swis.s \
src/tee/Makefile \
src/tee/Make_mvc.mak \
src/tee/tee.c \
--- 725,730 ----
*** ../vim-8.0.0526/src/swis.s 2010-05-15 13:04:07.000000000 +0200
--- src/swis.s 1970-01-01 01:00:00.000000000 +0100
***************
*** 1,143 ****
- ; 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
--- 0 ----
*** ../vim-8.0.0526/src/version.c 2017-03-30 21:18:40.818968442 +0200
--- src/version.c 2017-03-30 21:48:58.883753498 +0200
***************
*** 766,767 ****
--- 766,769 ----
{ /* Add new patch number below this line */
+ /**/
+ 527,
/**/
--
hundred-and-one symptoms of being an internet addict:
239. You think "surfing" is something you do on dry land.
/// Bram Moolenaar -- [email protected] -- http://www.Moolenaar.net \\\
/// sponsor Vim, vote for features -- http://www.Vim.org/sponsor/ \\\
\\\ an exciting new programming language -- http://www.Zimbu.org ///
\\\ help me help AIDS victims -- http://ICCF-Holland.org ///
--
--
You received this message from the "vim_dev" maillist.
Do not top-post! Type your reply below the text you are replying to.
For more information, visit http://www.vim.org/maillist.php
---
You received this message because you are subscribed to the Google Groups
"vim_dev" group.
To unsubscribe from this group and stop receiving emails from it, send an email
to [email protected].
For more options, visit https://groups.google.com/d/optout.
