Update of /cvsroot/wisp/wisp/src/native
In directory usw-pr-cvs1:/tmp/cvs-serv31654/src/native
Modified Files:
linux_syscall.inc sys.s sys.wth sys_raw.nasm
Log Message:
Dropped |sys:raw:lseek|.
Index: linux_syscall.inc
===================================================================
RCS file: /cvsroot/wisp/wisp/src/native/linux_syscall.inc,v
retrieving revision 1.11
retrieving revision 1.12
diff -u -d -r1.11 -r1.12
--- linux_syscall.inc 22 Jul 2002 14:53:16 -0000 1.11
+++ linux_syscall.inc 4 Sep 2002 14:35:28 -0000 1.12
@@ -36,23 +36,3 @@
int 0x80
ret
%endmacro
-
-%macro native_socketcall 2-3
-native sys_raw_%1, %2
-%assign %%i 1
-%rep %2 - 1
- pick %%i
-%assign %%i %%i + 2
-%endrep
- mov ecx, esp
-%if %0 > 2
- %3
-%endif
- mov ebx, CCC_sktnr_%1
- mov eax, CCC_sysnr_socketcall
- int 0x80
-%if %2 > 1
- drop 2 * %2 - 1
-%endif
- ret
-%endmacro
Index: sys.s
===================================================================
RCS file: /cvsroot/wisp/wisp/src/native/sys.s,v
retrieving revision 1.2
retrieving revision 1.3
diff -u -d -r1.2 -r1.3
--- sys.s 4 Sep 2002 14:28:37 -0000 1.2
+++ sys.s 4 Sep 2002 14:35:28 -0000 1.3
@@ -121,6 +121,30 @@
.equiv N_sys_ns_mkdir.L1, N_sys_ns_mkdir + 43
.section .text
.align 16
+N_sys_ns_lseek:
+.byte 144,81,131,249,3,15,132,8,0,0,0,88,137,193,233
+.long N_signal_argcount - (.+4)
+.byte 88,88,91,89,83,80,104
+.long N_sys_ns_lseek.L1
+.byte 81,233
+.long decui$1 - (.+4)
+.byte 91,89,83,80,104
+.long N_sys_ns_lseek.L2
+.byte 81,233
+.long decsi$1 - (.+4)
+.byte 91,89,83,80,104
+.long N_sys_ns_lseek.L3
+.byte 81,233
+.long decui$1 - (.+4)
+.byte 137,194,88,137,193,88,137,195,184,19,0,0,0,205,128,80,233
+.long encsi$1 - (.+4)
+.global N_sys_ns_lseek,NN_sys_ns_lseek,N_sys_ns_lseek.L1,N_sys_ns_lseek.L2,N_sys_ns_lseek.L3
+.equiv NN_sys_ns_lseek, N_sys_ns_lseek + 1
+.equiv N_sys_ns_lseek.L1, N_sys_ns_lseek + 36
+.equiv N_sys_ns_lseek.L2, N_sys_ns_lseek + 51
+.equiv N_sys_ns_lseek.L3, N_sys_ns_lseek + 66
+.section .text
+.align 16
N_sys_ns_listen:
.byte 144,81,131,249,2,15,132,8,0,0,0,88,137,193,233
.long N_signal_argcount - (.+4)
Index: sys.wth
===================================================================
RCS file: /cvsroot/wisp/wisp/src/native/sys.wth,v
retrieving revision 1.3
retrieving revision 1.4
diff -u -d -r1.3 -r1.4
--- sys.wth 4 Sep 2002 14:31:22 -0000 1.3
+++ sys.wth 4 Sep 2002 14:35:28 -0000 1.4
@@ -89,6 +89,9 @@
(native sys_ns_listen dup 2 = argc drop
swap decui swap decui sys.listen (flush) 'encsi$1 jump)
+(native sys_ns_lseek dup 3 = argc drop
+ rot decui rot decsi rot decui sys.lseek (flush) 'encsi$1 jump)
+
(native sys_ns_mkdir dup 2 = argc drop
swap ws->zt swap decui sys.mkdir (flush) 'encsi$1 jump)
Index: sys_raw.nasm
===================================================================
RCS file: /cvsroot/wisp/wisp/src/native/sys_raw.nasm,v
retrieving revision 1.44
retrieving revision 1.45
diff -u -d -r1.44 -r1.45
--- sys_raw.nasm 4 Sep 2002 14:28:37 -0000 1.44
+++ sys_raw.nasm 4 Sep 2002 14:35:28 -0000 1.45
@@ -19,7 +19,6 @@
native_syscall fcntl, 3
native_syscall getcwd, 2
native_syscall ioctl, 3
-native_syscall lseek, 3
native_syscall open, 3
native_syscall read, 3
native_syscall waitpid, 3, untag ecx ; so that a cons can be used
|
