Adapted to use of new assembler.
This commit is contained in:
parent
aee6a1648a
commit
f514411cea
|
@ -1,17 +1,21 @@
|
|||
# $Header$
|
||||
install:
|
||||
../../install head_em.s head_em
|
||||
../../install tail_mon.a tail_mon
|
||||
MACH=m68k4
|
||||
all: tail_mon
|
||||
install: all
|
||||
../../install tail_mon
|
||||
|
||||
compare:
|
||||
-../../compare head_em.s head_em
|
||||
-../../compare tail_mon.a tail_mon
|
||||
cmp: all
|
||||
-../../compare tail_mon
|
||||
|
||||
clean :
|
||||
tail_mon:
|
||||
ASAR=aal ; export ASAR ;\
|
||||
march . tail_mon
|
||||
|
||||
clean:
|
||||
rm -f *.o
|
||||
|
||||
opr :
|
||||
make pr | opr
|
||||
make pr | opr
|
||||
|
||||
pr:
|
||||
@pr -h `pwd`/head_em.s head_em.s
|
||||
@ar pv tail_mon.a | pr -h `pwd`/tail_mon.a
|
||||
@ar pv tail_mon.a
|
||||
|
|
|
@ -1,6 +1,10 @@
|
|||
.define __exit
|
||||
.extern __exit
|
||||
.text
|
||||
.sect .text
|
||||
.sect .rom
|
||||
.sect .data
|
||||
.sect .bss
|
||||
.sect .text
|
||||
__exit: move.w #0x1,d0
|
||||
move.l 4(sp),a0
|
||||
trap #0
|
||||
|
|
|
@ -1,6 +1,10 @@
|
|||
.define _access
|
||||
.extern _access
|
||||
.text
|
||||
.sect .text
|
||||
.sect .rom
|
||||
.sect .data
|
||||
.sect .bss
|
||||
.sect .text
|
||||
_access: move.w #0x21,d0
|
||||
move.l 4(sp),a0
|
||||
move.l 8(sp),d1
|
||||
|
|
|
@ -1,6 +1,10 @@
|
|||
.define _acct
|
||||
.extern _acct
|
||||
.text
|
||||
.sect .text
|
||||
.sect .rom
|
||||
.sect .data
|
||||
.sect .bss
|
||||
.sect .text
|
||||
_acct: move.w #0x33,d0
|
||||
move.l 4(sp),a0
|
||||
jmp callc
|
||||
|
|
|
@ -1,6 +1,10 @@
|
|||
.define _alarm
|
||||
.extern _alarm
|
||||
.text
|
||||
.sect .text
|
||||
.sect .rom
|
||||
.sect .data
|
||||
.sect .bss
|
||||
.sect .text
|
||||
_alarm: clr.l d0
|
||||
move.l 4(sp),a0
|
||||
move.w #0x1B,d0
|
||||
|
|
|
@ -2,7 +2,11 @@
|
|||
.define _sbrk
|
||||
.extern _brk
|
||||
.extern _sbrk
|
||||
.text
|
||||
.sect .text
|
||||
.sect .rom
|
||||
.sect .data
|
||||
.sect .bss
|
||||
.sect .text
|
||||
_sbrk: move.l .reghp,a0
|
||||
add.l 4(sp),a0
|
||||
move.w #0x11,d0
|
||||
|
|
|
@ -7,7 +7,11 @@
|
|||
.extern calle
|
||||
.extern cerror
|
||||
.extern _errno
|
||||
.text
|
||||
.sect .text
|
||||
.sect .rom
|
||||
.sect .data
|
||||
.sect .bss
|
||||
.sect .text
|
||||
call: trap #0
|
||||
bcs cerror
|
||||
rts
|
||||
|
|
|
@ -1,6 +1,10 @@
|
|||
.define _chdir
|
||||
.extern _chdir
|
||||
.text
|
||||
.sect .text
|
||||
.sect .rom
|
||||
.sect .data
|
||||
.sect .bss
|
||||
.sect .text
|
||||
_chdir: move.w #0xC,d0
|
||||
move.l 4(sp),a0
|
||||
jmp callc
|
||||
|
|
|
@ -1,6 +1,10 @@
|
|||
.define _chmod
|
||||
.extern _chmod
|
||||
.text
|
||||
.sect .text
|
||||
.sect .rom
|
||||
.sect .data
|
||||
.sect .bss
|
||||
.sect .text
|
||||
_chmod: move.w #0xF,d0
|
||||
move.l 4(sp),a0
|
||||
move.l 8(sp),d1
|
||||
|
|
|
@ -1,6 +1,10 @@
|
|||
.define _chown
|
||||
.extern _chown
|
||||
.text
|
||||
.sect .text
|
||||
.sect .rom
|
||||
.sect .data
|
||||
.sect .bss
|
||||
.sect .text
|
||||
_chown: move.w #0x10,d0
|
||||
move.l 4(sp),a0
|
||||
move.l 8(sp),d1
|
||||
|
|
|
@ -1,6 +1,10 @@
|
|||
.define _chroot
|
||||
.extern _chroot
|
||||
.text
|
||||
.sect .text
|
||||
.sect .rom
|
||||
.sect .data
|
||||
.sect .bss
|
||||
.sect .text
|
||||
_chroot: move.w #0x3D,d0
|
||||
move.l 4(sp),a0
|
||||
jmp callc
|
||||
|
|
|
@ -1,6 +1,10 @@
|
|||
.define __cleanup
|
||||
.extern __cleanup
|
||||
.text
|
||||
.sect .text
|
||||
.sect .rom
|
||||
.sect .data
|
||||
.sect .bss
|
||||
.sect .text
|
||||
__cleanup:
|
||||
tst.b -40(sp)
|
||||
link a6,#-0
|
||||
|
|
|
@ -1,6 +1,10 @@
|
|||
.define _close
|
||||
.extern _close
|
||||
.text
|
||||
.sect .text
|
||||
.sect .rom
|
||||
.sect .data
|
||||
.sect .bss
|
||||
.sect .text
|
||||
_close: move.w #0x6,d0
|
||||
move.l 4(sp),a0
|
||||
jmp callc
|
||||
|
|
|
@ -1,6 +1,10 @@
|
|||
.define _creat
|
||||
.extern _creat
|
||||
.text
|
||||
.sect .text
|
||||
.sect .rom
|
||||
.sect .data
|
||||
.sect .bss
|
||||
.sect .text
|
||||
_creat: move.w #0x8,d0
|
||||
move.l 4(sp),a0
|
||||
move.l 8(sp),d1
|
||||
|
|
|
@ -1,6 +1,10 @@
|
|||
.define _dup
|
||||
.extern _dup
|
||||
.text
|
||||
.sect .text
|
||||
.sect .rom
|
||||
.sect .data
|
||||
.sect .bss
|
||||
.sect .text
|
||||
_dup: move.w #0x29,d0
|
||||
move.l 4(sp),a0
|
||||
jmp call
|
||||
|
|
|
@ -1,6 +1,10 @@
|
|||
.define _dup2
|
||||
.extern _dup2
|
||||
.text
|
||||
.sect .text
|
||||
.sect .rom
|
||||
.sect .data
|
||||
.sect .bss
|
||||
.sect .text
|
||||
_dup2: move.w #0x29,d0
|
||||
move.l 4(sp),a0
|
||||
move.l 8(sp),d1
|
||||
|
|
|
@ -1,5 +1,9 @@
|
|||
.define _errno
|
||||
.extern _errno
|
||||
.bss
|
||||
.sect .text
|
||||
.sect .rom
|
||||
.sect .data
|
||||
.sect .bss
|
||||
.sect .bss
|
||||
_errno: .space 4
|
||||
.text
|
||||
.sect .text
|
||||
|
|
|
@ -1,5 +1,10 @@
|
|||
.define _execl
|
||||
.extern _execl
|
||||
.sect .text
|
||||
.sect .rom
|
||||
.sect .data
|
||||
.sect .bss
|
||||
.sect .text
|
||||
_execl: link a6,#0
|
||||
tst.b -132(sp)
|
||||
move.l _environ,-(sp)
|
||||
|
|
|
@ -1,6 +1,10 @@
|
|||
.define _execve
|
||||
.extern _execve
|
||||
.text
|
||||
.sect .text
|
||||
.sect .rom
|
||||
.sect .data
|
||||
.sect .bss
|
||||
.sect .text
|
||||
_execve: move.w #0x3B,d0
|
||||
move.l 4(sp),a0
|
||||
move.l 8(sp),d1
|
||||
|
|
|
@ -1,6 +1,10 @@
|
|||
.define _exit
|
||||
.extern _exit
|
||||
.text
|
||||
.sect .text
|
||||
.sect .rom
|
||||
.sect .data
|
||||
.sect .bss
|
||||
.sect .text
|
||||
_exit:
|
||||
tst.b -40(sp)
|
||||
link a6,#-0
|
||||
|
|
|
@ -1,6 +1,10 @@
|
|||
.define _fork
|
||||
.extern _fork
|
||||
.text
|
||||
.sect .text
|
||||
.sect .rom
|
||||
.sect .data
|
||||
.sect .bss
|
||||
.sect .text
|
||||
_fork: move.w #0x2,d0
|
||||
trap #0
|
||||
bra 1f
|
||||
|
|
|
@ -1,5 +1,10 @@
|
|||
.define _fstat
|
||||
.extern _fstat
|
||||
.sect .text
|
||||
.sect .rom
|
||||
.sect .data
|
||||
.sect .bss
|
||||
.sect .text
|
||||
_fstat: move.w #0x1C,d0
|
||||
move.l 4(sp),a0
|
||||
move.l 8(sp),d1
|
||||
|
|
|
@ -1,6 +1,10 @@
|
|||
.define _ftime
|
||||
.extern _ftime
|
||||
.text
|
||||
.sect .text
|
||||
.sect .rom
|
||||
.sect .data
|
||||
.sect .bss
|
||||
.sect .text
|
||||
_ftime: move.w #0x23,d0
|
||||
move.l 4(sp),a0
|
||||
jmp callc
|
||||
|
|
|
@ -1,6 +1,10 @@
|
|||
.define _getegid
|
||||
.extern _getegid
|
||||
.text
|
||||
.sect .text
|
||||
.sect .rom
|
||||
.sect .data
|
||||
.sect .bss
|
||||
.sect .text
|
||||
_getegid: move.w #0x2F,d0
|
||||
trap #0
|
||||
move.l d1,d0
|
||||
|
|
|
@ -1,6 +1,10 @@
|
|||
.define _getgid
|
||||
.extern _getgid
|
||||
.text
|
||||
.sect .text
|
||||
.sect .rom
|
||||
.sect .data
|
||||
.sect .bss
|
||||
.sect .text
|
||||
_getgid: move.w #0x2F,d0
|
||||
trap #0
|
||||
rts
|
||||
|
|
|
@ -1,6 +1,10 @@
|
|||
.define _getpid
|
||||
.extern _getpid
|
||||
.text
|
||||
.sect .text
|
||||
.sect .rom
|
||||
.sect .data
|
||||
.sect .bss
|
||||
.sect .text
|
||||
_getpid: move.w #0x14,d0
|
||||
trap #0
|
||||
rts
|
||||
|
|
|
@ -1,6 +1,10 @@
|
|||
.define _getuid
|
||||
.extern _getuid
|
||||
.text
|
||||
.sect .text
|
||||
.sect .rom
|
||||
.sect .data
|
||||
.sect .bss
|
||||
.sect .text
|
||||
_getuid: move.w #0x18,d0
|
||||
trap #0
|
||||
rts
|
||||
|
|
|
@ -1,6 +1,10 @@
|
|||
.define _gtty
|
||||
.extern _gtty
|
||||
.text
|
||||
.sect .text
|
||||
.sect .rom
|
||||
.sect .data
|
||||
.sect .bss
|
||||
.sect .text
|
||||
_gtty:
|
||||
tst.b -40(sp)
|
||||
link a6,#-0
|
||||
|
|
|
@ -1,6 +1,10 @@
|
|||
.define _ioctl
|
||||
.extern _ioctl
|
||||
.text
|
||||
.sect .text
|
||||
.sect .rom
|
||||
.sect .data
|
||||
.sect .bss
|
||||
.sect .text
|
||||
_ioctl: move.w #0x36,d0
|
||||
move.l 4(sp),a0
|
||||
move.l 8(sp),d1
|
||||
|
|
|
@ -1,6 +1,10 @@
|
|||
.define _kill
|
||||
.extern _kill
|
||||
.text
|
||||
.sect .text
|
||||
.sect .rom
|
||||
.sect .data
|
||||
.sect .bss
|
||||
.sect .text
|
||||
_kill: move.w #0x25,d0
|
||||
move.l 4(sp),a0
|
||||
move.l 6(sp),d1
|
||||
|
|
|
@ -1,6 +1,10 @@
|
|||
.define _link
|
||||
.extern _link
|
||||
.text
|
||||
.sect .text
|
||||
.sect .rom
|
||||
.sect .data
|
||||
.sect .bss
|
||||
.sect .text
|
||||
_link: move.w #0x9,d0
|
||||
move.l 4(sp),a0
|
||||
move.l 8(sp),d1
|
||||
|
|
|
@ -1,6 +1,10 @@
|
|||
.define _lock
|
||||
.extern _lock
|
||||
.text
|
||||
.sect .text
|
||||
.sect .rom
|
||||
.sect .data
|
||||
.sect .bss
|
||||
.sect .text
|
||||
_lock: move.w #0x35,d0
|
||||
move.l 4(sp),a0
|
||||
jmp callc
|
||||
|
|
|
@ -1,6 +1,10 @@
|
|||
.define _lseek
|
||||
.extern _lseek
|
||||
.text
|
||||
.sect .text
|
||||
.sect .rom
|
||||
.sect .data
|
||||
.sect .bss
|
||||
.sect .text
|
||||
_lseek: move.w #0x13,d0
|
||||
move.l 4(sp),a0
|
||||
move.l 8(sp),d1
|
||||
|
|
|
@ -1,6 +1,10 @@
|
|||
.define _mknod
|
||||
.extern _mknod
|
||||
.text
|
||||
.sect .text
|
||||
.sect .rom
|
||||
.sect .data
|
||||
.sect .bss
|
||||
.sect .text
|
||||
_mknod: move.w #0xE,d0
|
||||
move.l 4(sp),a0
|
||||
move.l 8(sp),d1
|
||||
|
|
|
@ -1,7 +1,10 @@
|
|||
|
||||
.define _mount
|
||||
.extern _mount
|
||||
.text
|
||||
.sect .text
|
||||
.sect .rom
|
||||
.sect .data
|
||||
.sect .bss
|
||||
.sect .text
|
||||
_mount: move.w #0x15,d0
|
||||
move.l 4(sp),a0
|
||||
move.l 8(sp),d1
|
||||
|
|
|
@ -1,6 +1,10 @@
|
|||
.define _nice
|
||||
.extern _nice
|
||||
.text
|
||||
.sect .text
|
||||
.sect .rom
|
||||
.sect .data
|
||||
.sect .bss
|
||||
.sect .text
|
||||
_nice: move.w #0x22,d0
|
||||
move.l 4(sp),a0
|
||||
jmp callc
|
||||
|
|
|
@ -1,6 +1,10 @@
|
|||
.define _open
|
||||
.extern _open
|
||||
.text
|
||||
.sect .text
|
||||
.sect .rom
|
||||
.sect .data
|
||||
.sect .bss
|
||||
.sect .text
|
||||
_open: move.w #0x5,d0
|
||||
move.l 4(sp),a0
|
||||
move.l 8(sp),d1
|
||||
|
|
|
@ -1,6 +1,10 @@
|
|||
.define _pause
|
||||
.extern _pause
|
||||
.text
|
||||
.sect .text
|
||||
.sect .rom
|
||||
.sect .data
|
||||
.sect .bss
|
||||
.sect .text
|
||||
_pause: move.w #0x1D,d0
|
||||
trap #0
|
||||
rts
|
||||
|
|
|
@ -1,5 +1,10 @@
|
|||
.define _pipe
|
||||
.extern _pipe
|
||||
.sect .text
|
||||
.sect .rom
|
||||
.sect .data
|
||||
.sect .bss
|
||||
.sect .text
|
||||
_pipe:
|
||||
move.w #0x2A,d0
|
||||
trap #0
|
||||
|
|
|
@ -1,6 +1,10 @@
|
|||
.define _profil
|
||||
.extern _profil
|
||||
.text
|
||||
.sect .text
|
||||
.sect .rom
|
||||
.sect .data
|
||||
.sect .bss
|
||||
.sect .text
|
||||
_profil: move.w #0x2C,d0
|
||||
move.l 4(sp),a0
|
||||
move.l 8(sp),d1
|
||||
|
|
|
@ -1,7 +1,11 @@
|
|||
.define _ptrace
|
||||
.extern _ptrace
|
||||
.extern _errno
|
||||
.text
|
||||
.sect .text
|
||||
.sect .rom
|
||||
.sect .data
|
||||
.sect .bss
|
||||
.sect .text
|
||||
_ptrace: move.w #0x1A,d0
|
||||
move.l 16(sp),a0
|
||||
move.l 12(sp),d1
|
||||
|
|
|
@ -1,6 +1,10 @@
|
|||
.define _read
|
||||
.extern _read
|
||||
.text
|
||||
.sect .text
|
||||
.sect .rom
|
||||
.sect .data
|
||||
.sect .bss
|
||||
.sect .text
|
||||
_read: move.w #0x3,d0
|
||||
move.l 4(sp),a0
|
||||
move.l 8(sp),d1
|
||||
|
|
|
@ -1,6 +1,10 @@
|
|||
.define _setgid
|
||||
.extern _setgid
|
||||
.text
|
||||
.sect .text
|
||||
.sect .rom
|
||||
.sect .data
|
||||
.sect .bss
|
||||
.sect .text
|
||||
_setgid: move.w #0x2E,d0
|
||||
move.l 4(sp),a0
|
||||
jmp callc
|
||||
|
|
|
@ -1,6 +1,10 @@
|
|||
.define _setuid
|
||||
.extern _setuid
|
||||
.text
|
||||
.sect .text
|
||||
.sect .rom
|
||||
.sect .data
|
||||
.sect .bss
|
||||
.sect .text
|
||||
_setuid: move.w #0x17,d0
|
||||
move.l 4(sp),a0
|
||||
jmp callc
|
||||
|
|
|
@ -1,5 +1,10 @@
|
|||
.define _signal
|
||||
.extern _signal
|
||||
.sect .text
|
||||
.sect .rom
|
||||
.sect .data
|
||||
.sect .bss
|
||||
.sect .text
|
||||
NSIG=32
|
||||
_signal:
|
||||
move.l 4(sp), d0
|
||||
|
@ -82,5 +87,5 @@ enter:
|
|||
movem.l (sp)+,d0/d1/a0/a1
|
||||
add.l #4,sp
|
||||
rtr
|
||||
.bss
|
||||
.sect .bss
|
||||
dvect: .space 4*NSIG
|
||||
|
|
|
@ -1,6 +1,10 @@
|
|||
.define _stat
|
||||
.extern _stat
|
||||
.text
|
||||
.sect .text
|
||||
.sect .rom
|
||||
.sect .data
|
||||
.sect .bss
|
||||
.sect .text
|
||||
_stat: move.w #0x12,d0
|
||||
move.l 4(sp),a0
|
||||
move.l 8(sp),d1
|
||||
|
|
|
@ -1,6 +1,9 @@
|
|||
.define _stime
|
||||
.extern _stime
|
||||
.text
|
||||
.sect .rom
|
||||
.sect .data
|
||||
.sect .bss
|
||||
.sect .text
|
||||
_stime: move.w #0x19,d0
|
||||
move.l 4(sp),a0
|
||||
move.l (a0),a0
|
||||
|
|
|
@ -1,6 +1,9 @@
|
|||
.define _stty
|
||||
.extern _stty
|
||||
.text
|
||||
.sect .rom
|
||||
.sect .data
|
||||
.sect .bss
|
||||
.sect .text
|
||||
_stty:
|
||||
tst.b -40(sp)
|
||||
link a6,#-0
|
||||
|
|
|
@ -1,6 +1,9 @@
|
|||
.define _sync
|
||||
.extern _sync
|
||||
.text
|
||||
.sect .rom
|
||||
.sect .data
|
||||
.sect .bss
|
||||
.sect .text
|
||||
_sync: move.w #0x24,d0
|
||||
trap #0
|
||||
rts
|
||||
|
|
|
@ -1,6 +1,10 @@
|
|||
.define _time
|
||||
.extern _time
|
||||
.text
|
||||
.sect .text
|
||||
.sect .rom
|
||||
.sect .data
|
||||
.sect .bss
|
||||
.sect .text
|
||||
_time: move.w #0xD,d0
|
||||
trap #0
|
||||
tst.l 4(sp)
|
||||
|
|
|
@ -1,6 +1,10 @@
|
|||
.define _times
|
||||
.extern _times
|
||||
.text
|
||||
.sect .text
|
||||
.sect .rom
|
||||
.sect .data
|
||||
.sect .bss
|
||||
.sect .text
|
||||
_times: move.w #0x2B,d0
|
||||
move.l 4(sp),a0
|
||||
trap #0
|
||||
|
|
|
@ -1,6 +1,10 @@
|
|||
.define _umask
|
||||
.extern _umask
|
||||
.text
|
||||
.sect .text
|
||||
.sect .rom
|
||||
.sect .data
|
||||
.sect .bss
|
||||
.sect .text
|
||||
_umask: move.w #0x3C,d0
|
||||
move.l 4(sp),a0
|
||||
jmp call
|
||||
|
|
|
@ -1,6 +1,10 @@
|
|||
.define _umount
|
||||
.extern _umount
|
||||
.text
|
||||
.sect .text
|
||||
.sect .rom
|
||||
.sect .data
|
||||
.sect .bss
|
||||
.sect .text
|
||||
_umount: move.w #0x16,d0
|
||||
move.l 4(sp),a0
|
||||
jmp callc
|
||||
|
|
|
@ -1,6 +1,10 @@
|
|||
.define _unlink
|
||||
.extern _unlink
|
||||
.text
|
||||
.sect .text
|
||||
.sect .rom
|
||||
.sect .data
|
||||
.sect .bss
|
||||
.sect .text
|
||||
_unlink: move.w #0xA,d0
|
||||
move.l 4(sp),a0
|
||||
jmp callc
|
||||
|
|
|
@ -1,6 +1,10 @@
|
|||
.define _utime
|
||||
.extern _utime
|
||||
.text
|
||||
.sect .text
|
||||
.sect .rom
|
||||
.sect .data
|
||||
.sect .bss
|
||||
.sect .text
|
||||
_utime: move.w #0x1E,d0
|
||||
move.l 4(sp),a0
|
||||
move.l 8(sp),d1
|
||||
|
|
|
@ -1,5 +1,10 @@
|
|||
.define _wait
|
||||
.extern _wait
|
||||
.sect .text
|
||||
.sect .rom
|
||||
.sect .data
|
||||
.sect .bss
|
||||
.sect .text
|
||||
_wait: move.w #0x7,d0
|
||||
move.l 4(sp),a0
|
||||
trap #0
|
||||
|
|
|
@ -1,6 +1,10 @@
|
|||
.define _write
|
||||
.extern _write
|
||||
.text
|
||||
.sect .text
|
||||
.sect .rom
|
||||
.sect .data
|
||||
.sect .bss
|
||||
.sect .text
|
||||
_write: move.w #0x4,d0
|
||||
move.l 4(sp),a0
|
||||
move.l 8(sp),d1
|
||||
|
|
Loading…
Reference in a new issue