new version for assembler producing .o files
authorceriel <none@none>
Tue, 27 Jan 1987 20:37:46 +0000 (20:37 +0000)
committerceriel <none@none>
Tue, 27 Jan 1987 20:37:46 +0000 (20:37 +0000)
42 files changed:
mach/pmds/libsys/LIST
mach/pmds/libsys/Makefile
mach/pmds/libsys/access.s
mach/pmds/libsys/alarm.s
mach/pmds/libsys/cerror.s
mach/pmds/libsys/chmod.s
mach/pmds/libsys/chown.s
mach/pmds/libsys/cleanup.s
mach/pmds/libsys/close.s
mach/pmds/libsys/compmodule [new file with mode: 0755]
mach/pmds/libsys/creat.s
mach/pmds/libsys/dup.s
mach/pmds/libsys/exec.s
mach/pmds/libsys/exit1.s
mach/pmds/libsys/exit2.s
mach/pmds/libsys/fork.s
mach/pmds/libsys/fstat.s
mach/pmds/libsys/getgid.s
mach/pmds/libsys/getpid.s
mach/pmds/libsys/getuid.s
mach/pmds/libsys/gtty.s
mach/pmds/libsys/head_em.s
mach/pmds/libsys/ioctl.s
mach/pmds/libsys/kill.s
mach/pmds/libsys/link.s
mach/pmds/libsys/lseek.s
mach/pmds/libsys/mknod.s
mach/pmds/libsys/mount.s
mach/pmds/libsys/nice.s
mach/pmds/libsys/open.s
mach/pmds/libsys/pause.s
mach/pmds/libsys/pipe.s
mach/pmds/libsys/profil.s
mach/pmds/libsys/read.s
mach/pmds/libsys/sbrk.s
mach/pmds/libsys/signal.s
mach/pmds/libsys/stat.s
mach/pmds/libsys/stty.s
mach/pmds/libsys/time.s
mach/pmds/libsys/unlink.s
mach/pmds/libsys/wait.s
mach/pmds/libsys/write.s

index 5b28800..43cdccb 100644 (file)
@@ -1,4 +1,4 @@
-tail_mon
+libmon_s.a
 gtty.s
 stty.s
 chmod.s
index d3d832c..1ae02d2 100644 (file)
@@ -1,16 +1,29 @@
-install:
-       ../../install head_em
-       ../../install tail_mon
+# $Header$
+MACH=pmds
+all:           libmon_o.a head_em.o
 
-cmp:
-       -../../compare head_em
-       -../../compare tail_mon
+install:       all
+               ../../install head_em.o head_em
+               ../../install libmon_o.a tail_mon
 
-clean :
+
+cmp:           all
+               -../../compare head_em.o head_em
+               -../../compare libmon_o.a tail_mon
+
+libmon_o.a:    libmon_s.a
+               ASAR=aal ; export ASAR ;\
+               march . libmon_o.a
+
+head_em.o:     head_em.s
+               $(MACH) -I../../../h -c head_em.s
+
+clean:
+               rm -f *.o libmon_o.a
 
 opr :
-       make pr | opr
+               make pr | opr
 
 pr:
-       @pr `pwd`/head_em
-       @arch pv tail_mon | pr -h `pwd`/tail_mon
+               @pr `pwd`/head_em.s
+               @arch pv libmon_s.a | pr -h `pwd`/libmon_s.a
index 24a8235..b2e4b0f 100644 (file)
@@ -1,6 +1,11 @@
 .define _access
+.sect .text
+.sect .rom
+.sect .data
+.sect .bss
+.sect .text
 .extern _access
-.text
+.sect .text
 _access:
 tst.b -40(sp)
 link   a6,#-0
@@ -13,7 +18,7 @@ add.l #8,sp
 unlk a6
 rts
 __Saccess:             trap #0
-.short 0x21
+.data2 0x21
                        bcc     1f
                        jmp     cerror
 1:
index 88bcb72..4688339 100644 (file)
@@ -1,6 +1,11 @@
 .define _alarm
+.sect .text
+.sect .rom
+.sect .data
+.sect .bss
+.sect .text
 .extern _alarm
-.text
+.sect .text
 _alarm:
 tst.b -40(sp)
 link   a6,#-0
@@ -11,5 +16,5 @@ add.l #4,sp
 unlk a6
 rts
 __Salarm:              trap #0
-.short 0x1B
+.data2 0x1B
                        rts
index d9fff34..a69e202 100644 (file)
@@ -1,9 +1,14 @@
 .define cerror
+.sect .text
+.sect .rom
+.sect .data
+.sect .bss
+.sect .text
 .extern cerror
 cerror:                        move.l d0,_errno
                        move.l #-1,d0
                        rts
-.bss
+.sect .bss
 _errno:
                        .space 4
-.text
+.sect .text
index 3e62876..ba5cae0 100644 (file)
@@ -1,6 +1,11 @@
 .define _chmod
+.sect .text
+.sect .rom
+.sect .data
+.sect .bss
+.sect .text
 .extern _chmod
-.text
+.sect .text
 _chmod:
 tst.b -40(sp)
 link   a6,#-0
@@ -13,7 +18,7 @@ add.l #8,sp
 unlk a6
 rts
 __Schmod:              trap #0
-.short 0xF
+.data2 0xF
                        bcc     1f
                        jmp     cerror
 1:
index 8cd8968..16f602b 100644 (file)
@@ -1,6 +1,11 @@
 .define _chown
+.sect .text
+.sect .rom
+.sect .data
+.sect .bss
+.sect .text
 .extern _chown
-.text
+.sect .text
 _chown:
 tst.b -40(sp)
 link   a6,#-0
@@ -16,7 +21,7 @@ lea 12(sp),sp
 unlk a6
 rts
 __Schown:              trap #0
-.short 0x10
+.data2 0x10
                        bcc     1f
                        jmp     cerror
 1:
index ce4a763..db80fbf 100644 (file)
@@ -1,5 +1,10 @@
 .define __cleanup
+.sect .text
+.sect .rom
+.sect .data
+.sect .bss
+.sect .text
 .extern __cleanup
-.text
+.sect .text
 __cleanup:
 rts
index a32ac79..6432b57 100644 (file)
@@ -1,6 +1,11 @@
 .define _close
+.sect .text
+.sect .rom
+.sect .data
+.sect .bss
+.sect .text
 .extern _close
-.text
+.sect .text
 _close:
 tst.b -40(sp)
 link   a6,#-0
@@ -12,7 +17,7 @@ add.l #4,sp
 unlk a6
 rts
 __Sclose:              trap #0
-.short 0x6
+.data2 0x6
                        bcc     1f
                        jmp     cerror
 1:
diff --git a/mach/pmds/libsys/compmodule b/mach/pmds/libsys/compmodule
new file mode 100755 (executable)
index 0000000..38b5335
--- /dev/null
@@ -0,0 +1,4 @@
+if pmds -c $1 1>&2
+then echo `basename $1 $2`.o
+else exit 1
+fi
index 88df103..2b1a14b 100644 (file)
@@ -1,6 +1,11 @@
 .define _creat
+.sect .text
+.sect .rom
+.sect .data
+.sect .bss
+.sect .text
 .extern _creat
-.text
+.sect .text
 _creat:
 tst.b -40(sp)
 link   a6,#-0
@@ -13,7 +18,7 @@ add.l #8,sp
 unlk a6
 rts
 __Screat:              trap #0
-.short 0x8
+.data2 0x8
                        bcc     1f
                        jmp     cerror
 1:
index f189fb5..3258364 100644 (file)
@@ -1,7 +1,12 @@
 .define _dup
 .define _dup2
+.sect .text
+.sect .rom
+.sect .data
+.sect .bss
+.sect .text
 .extern _dup
-.text
+.sect .text
 _dup:
 tst.b -40(sp)
 link   a6,#-0
@@ -29,7 +34,7 @@ rts
 __Sdup2:               or.l    #64,4(sp)
 
 __Sdup:                        trap #0
-.short 0x29
+.data2 0x29
                        bcc     1f
                        jmp     cerror
 1:
index 22a8260..b10f3ea 100644 (file)
@@ -1,6 +1,11 @@
 .define _execl
 .define _execve
 .define _execv
+.sect .text
+.sect .rom
+.sect .data
+.sect .bss
+.sect .text
 .extern _execl
 .extern _execve
 .extern _execv
@@ -14,7 +19,7 @@ _execl:               tst.b -48(sp)
                unlk a6
                rts
 _execve:       trap #0
-.short 59
+.data2 59
                jmp cerror
 _execv:                tst.b -48(sp)
                link a6,#0
index d766750..d557338 100644 (file)
@@ -1,6 +1,11 @@
 .define _exit
+.sect .text
+.sect .rom
+.sect .data
+.sect .bss
+.sect .text
 .extern _exit
-.text
+.sect .text
 _exit:
 tst.b -40(sp)
 link   a6,#-0
index ea2bea6..dec1340 100644 (file)
@@ -1,6 +1,11 @@
 .define __exit
+.sect .text
+.sect .rom
+.sect .data
+.sect .bss
+.sect .text
 .extern __exit
-.text
+.sect .text
 __exit:
 tst.b -40(sp)
 link   a6,#-0
@@ -12,4 +17,4 @@ add.l #4,sp
 unlk a6
 rts
 __Sexit:               trap #0
-.short                 0x1
+.data2                 0x1
index ca96887..e943818 100644 (file)
@@ -1,7 +1,12 @@
 .define _fork
+.sect .text
+.sect .rom
+.sect .data
+.sect .bss
+.sect .text
 .extern _fork
 _fork:         trap #0
-.short 0x2
+.data2 0x2
                bra 3f
                rts
 3:
index 3aaee95..0ba3547 100644 (file)
@@ -1,6 +1,11 @@
 .define _fstat
+.sect .text
+.sect .rom
+.sect .data
+.sect .bss
+.sect .text
 .extern _fstat
-.text
+.sect .text
 _fstat:
 tst.b -40(sp)
 link   a6,#-0
@@ -13,7 +18,7 @@ add.l #8,sp
 unlk a6
 rts
 __Sfstat:              trap #0
-.short 0x1C
+.data2 0x1C
                        bcc     1f
                        jmp     cerror
 1:
index 098977a..9f945f2 100644 (file)
@@ -1,12 +1,17 @@
 .define _getgid
 .define _getegid
+.sect .text
+.sect .rom
+.sect .data
+.sect .bss
+.sect .text
 .extern _getgid
 .extern _getegid
 _getgid:               trap #0
-.short 0x2F
+.data2 0x2F
                        rts
 
 _getegid:              trap #0
-.short 0x2F
+.data2 0x2F
                        move.l  d1,d0
                        rts
index 7589427..e676b50 100644 (file)
@@ -1,5 +1,10 @@
 .define _getpid
+.sect .text
+.sect .rom
+.sect .data
+.sect .bss
+.sect .text
 .extern _getpid
 _getpid:               trap #0
-.short 0x14
+.data2 0x14
                        rts
index 53f6b0b..487c6fb 100644 (file)
@@ -1,12 +1,17 @@
 .define _getuid
 .define _geteuid
+.sect .text
+.sect .rom
+.sect .data
+.sect .bss
+.sect .text
 .extern _getuid
 .extern _geteuid
 _getuid:               trap #0
-.short 0x18
+.data2 0x18
                        rts
 
 _geteuid:              trap #0
-.short 0x18
+.data2 0x18
                        move.l  d1,d0
                        rts
index ee9f096..50b6e8b 100644 (file)
@@ -1,6 +1,11 @@
 .define _gtty
+.sect .text
+.sect .rom
+.sect .data
+.sect .bss
+.sect .text
 .extern _gtty
-.text
+.sect .text
 _gtty:
 tst.b -40(sp)
 link   a6,#-0
index 92d4f2e..6e410b2 100644 (file)
@@ -1,12 +1,17 @@
 .define        CERASE,CKILL,CSTOP,CSTART
 .define .lino,.filn
-
 .define F_DUM,EXIT
-
 .define        begtext,begdata,begbss
 .define        EARRAY,ERANGE,ESET,EIDIVZ,EHEAP,EILLINS,ECASE
 .define        hol0,.reghp,.limhp,.trpim,.trppc
 .define        LINO_AD,FILN_AD
+.sect .text
+.sect .rom
+.sect .data
+.sect .bss
+.sect .text
+
+
 
 
 CERASE = 010
@@ -27,7 +32,7 @@ EHEAP = 17
 EILLINS        = 18
 ECASE  = 20
 
-       .text
+       .sect .text
 begtext:
        add.l   #2,sp !convert argc from 4-byte to 2-byte
        pea     endbss
@@ -37,22 +42,22 @@ begtext:
        add     #010,sp
 EXIT:
 
-       .data
+       .sect .data
 begdata:
 hol0:
 .lino:
-       .short  0,0     ! lino
+       .data2  0,0     ! lino
 .filn:
-       .long   0       ! filn
+       .data4  0       ! filn
 .reghp:
-       .long   endbss
+       .data4  endbss
 .limhp:
-       .long   endbss
+       .data4  endbss
 .trppc:
-       .long   0
+       .data4  0
 .trpim:
-       .short  0
+       .data2  0
 
 
-       .bss
+       .sect .bss
 begbss:
index fea8587..86a784b 100644 (file)
@@ -1,6 +1,11 @@
 .define _ioctl
+.sect .text
+.sect .rom
+.sect .data
+.sect .bss
+.sect .text
 .extern _ioctl
-.text
+.sect .text
 _ioctl:
 tst.b -40(sp)
 link   a6,#-0
@@ -16,7 +21,7 @@ lea 12(sp),sp
 unlk a6
 rts
 __Sioctl:              trap #0
-.short 0x36
+.data2 0x36
                        bcc     1f
                        jmp     cerror
 1:
index d900ac2..a880c21 100644 (file)
@@ -1,6 +1,11 @@
 .define _kill
+.sect .text
+.sect .rom
+.sect .data
+.sect .bss
+.sect .text
 .extern _kill
-.text
+.sect .text
 _kill:
 tst.b -40(sp)
 link   a6,#-0
@@ -15,7 +20,7 @@ add.l #8,sp
 unlk a6
 rts
 __Skill:               trap #0
-.short 0x25
+.data2 0x25
                        bcc     1f
                        jmp     cerror
 1:
index e1531b9..7a07106 100644 (file)
@@ -1,7 +1,12 @@
 .define _link
+.sect .text
+.sect .rom
+.sect .data
+.sect .bss
+.sect .text
 .extern _link
 _link:                 trap #0
-.short 0x9
+.data2 0x9
                        bcc     1f
                        jmp     cerror
 1:
index 8be8d2b..c27a93f 100644 (file)
@@ -1,6 +1,11 @@
 .define _lseek
+.sect .text
+.sect .rom
+.sect .data
+.sect .bss
+.sect .text
 .extern _lseek
-.text
+.sect .text
 _lseek:
 tst.b -40(sp)
 link   a6,#-0
@@ -16,7 +21,7 @@ lea 12(sp),sp
 unlk a6
 rts
 __Slseek:              trap #0
-.short 0x13
+.data2 0x13
                        bcc     1f
                        jmp     cerror
 1:
index 306035f..d2f86fe 100644 (file)
@@ -1,6 +1,11 @@
 .define _mknod
+.sect .text
+.sect .rom
+.sect .data
+.sect .bss
+.sect .text
 .extern _mknod
-.text
+.sect .text
 _mknod:
 tst.b -40(sp)
 link   a6,#-0
@@ -16,7 +21,7 @@ lea 12(sp),sp
 unlk a6
 rts
 __Smknod:              trap #0
-.short 0xE
+.data2 0xE
                        bcc     1f
                        jmp     cerror
 1:
index 8496783..d890ac5 100644 (file)
@@ -1,6 +1,11 @@
 .define _mount
+.sect .text
+.sect .rom
+.sect .data
+.sect .bss
+.sect .text
 .extern _mount
-.text
+.sect .text
 _mount:
 tst.b -40(sp)
 link   a6,#-0
@@ -14,7 +19,7 @@ lea 12(sp),sp
 unlk a6
 rts
 __Smount:              trap #0
-.short 0x15
+.data2 0x15
                        bcc     1f
                        jmp     cerror
 1:
index b264a5d..6eddc6f 100644 (file)
@@ -1,6 +1,11 @@
 .define _nice
+.sect .text
+.sect .rom
+.sect .data
+.sect .bss
+.sect .text
 .extern _nice
-.text
+.sect .text
 _nice:
 tst.b -40(sp)
 link   a6,#-0
@@ -12,7 +17,7 @@ add.l #4,sp
 unlk a6
 rts
 __Snice:               trap #0
-.short 0x22
+.data2 0x22
                        bcc     1f
                        jmp     cerror
 1:
index 6a94762..bb1bd14 100644 (file)
@@ -1,6 +1,11 @@
 .define _open
+.sect .text
+.sect .rom
+.sect .data
+.sect .bss
+.sect .text
 .extern _open
-.text
+.sect .text
 _open:
 tst.b -40(sp)
 link   a6,#-0
@@ -13,7 +18,7 @@ add.l #8,sp
 unlk a6
 rts
 __Sopen:               trap #0
-.short 0x5
+.data2 0x5
                        bcc     1f
                        jmp     cerror
 1:
index 3ce0e8c..4db34d4 100644 (file)
@@ -1,7 +1,12 @@
 .define _pause
+.sect .text
+.sect .rom
+.sect .data
+.sect .bss
+.sect .text
 .extern _pause
 _pause:                trap #0
-.short 29
+.data2 29
                bcc 1f
                jmp cerror
 1:
index 0b57d35..8691aa3 100644 (file)
@@ -1,7 +1,12 @@
 .define _pipe
+.sect .text
+.sect .rom
+.sect .data
+.sect .bss
+.sect .text
 .extern _pipe
 _pipe:         trap #0
-.short 0x2A
+.data2 0x2A
                bcc 1f
                jmp cerror
 1:
index 475087c..054d9b1 100644 (file)
@@ -1,6 +1,11 @@
 .define _profil
+.sect .text
+.sect .rom
+.sect .data
+.sect .bss
+.sect .text
 .extern _profil
-.text
+.sect .text
 _profil:
 tst.b -40(sp)
 link   a6,#-0
@@ -19,5 +24,5 @@ lea 16(sp),sp
 unlk a6
 rts
 __Sprofil:             trap #0
-.short 0x2C
+.data2 0x2C
                        rts
index ccf421c..47b3e8a 100644 (file)
@@ -1,6 +1,11 @@
 .define _read
+.sect .text
+.sect .rom
+.sect .data
+.sect .bss
+.sect .text
 .extern _read
-.text
+.sect .text
 _read:
 tst.b -40(sp)
 link   a6,#-0
@@ -16,7 +21,7 @@ lea 12(sp),sp
 unlk a6
 rts
 __Sread:               trap #0
-.short 0x3
+.data2 0x3
                        bcc     1f
                        jmp     cerror
 1:
index 4ec68dc..f9c4d3a 100644 (file)
@@ -1,7 +1,12 @@
 .define _brk
 .define _sbrk
+.sect .text
+.sect .rom
+.sect .data
+.sect .bss
+.sect .text
 .extern _brk
-.text
+.sect .text
 _brk:
 tst.b -40(sp)
 link   a6,#-0
@@ -28,7 +33,7 @@ __Ssbrk:              tst.b   -8(sp)
                        move.l  d0,-(sp)
                        clr.l   -(sp)
                        trap #0
-.short 0x11
+.data2 0x11
                        add.l   #8,sp
                        bcc     1f
                        jmp     cerror
@@ -38,13 +43,13 @@ __Ssbrk:            tst.b   -8(sp)
                        add.l   d1,nd
                        rts
 __Sbrk:                        trap #0
-.short 0x11
+.data2 0x11
                        bcc     1f
                        jmp     cerror
 1:
                        move.l  4(sp),nd
                        clr.l   d0
                        rts
-.data
-nd:                    .long endbss
-.text
+.sect .data
+nd:                    .data4 endbss
+.sect .text
index d5c86f5..a091b3f 100644 (file)
@@ -1,4 +1,9 @@
 .define _signal
+.sect .text
+.sect .rom
+.sect .data
+.sect .bss
+.sect .text
 .extern _signal
 NSIG=32
 _signal:
@@ -22,7 +27,7 @@ _signal:
        move.l  d0,-(sp)
        clr.l   -(sp)
        trap #0
-.short         48
+.data2         48
        add.l   #12,sp
        bcs     3f
        btst    #0,d0
@@ -49,6 +54,6 @@ enter:
        movem.l (sp)+,d0/d1/a0/a1
        add.l   #4,sp
        rtr
-.bss
+.sect .bss
 dvect: .space 4*NSIG
-.text
+.sect .text
index 45dfa75..2d41ec4 100644 (file)
@@ -1,7 +1,12 @@
 .define _stat
+.sect .text
+.sect .rom
+.sect .data
+.sect .bss
+.sect .text
 .extern _stat
 _stat:                 trap #0
-.short 0x12
+.data2 0x12
                        bcc     1f
                        jmp     cerror
 1:
index 46a497c..ddc621c 100644 (file)
@@ -1,6 +1,11 @@
 .define _stty
+.sect .text
+.sect .rom
+.sect .data
+.sect .bss
+.sect .text
 .extern _stty
-.text
+.sect .text
 _stty:
 tst.b -40(sp)
 link   a6,#-0
index dce2365..a30be11 100644 (file)
@@ -1,9 +1,14 @@
 .define _time
 .define _ftime
+.sect .text
+.sect .rom
+.sect .data
+.sect .bss
+.sect .text
 .extern _time
 _time:
        trap #0
-.short 0xD
+.data2 0xD
        tst.l 4(sp)
        beq 1f
        move.l 4(sp),a0
@@ -13,7 +18,7 @@ _time:
 .extern _ftime
 _ftime:
        trap #0
-.short 0x23
+.data2 0x23
        bcc 1f
        jmp cerror
 1:
index 2093ce7..14fd3b7 100644 (file)
@@ -1,7 +1,12 @@
 .define _unlink
+.sect .text
+.sect .rom
+.sect .data
+.sect .bss
+.sect .text
 .extern _unlink
 _unlink:               trap #0
-.short 0xA
+.data2 0xA
                        bcc     1f
                        jmp     cerror
 1:
index fa84833..f994c3a 100644 (file)
@@ -1,7 +1,12 @@
 .define _wait
+.sect .text
+.sect .rom
+.sect .data
+.sect .bss
+.sect .text
 .extern _wait
 _wait:         trap #0
-.short 0x7
+.data2 0x7
                bcc 1f
                jmp cerror
 1:
index 8789104..c044d2d 100644 (file)
@@ -1,6 +1,11 @@
 .define _write
+.sect .text
+.sect .rom
+.sect .data
+.sect .bss
+.sect .text
 .extern _write
-.text
+.sect .text
 _write:
 tst.b -40(sp)
 link   a6,#-0
@@ -16,7 +21,7 @@ lea 12(sp),sp
 unlk a6
 rts
 __Swrite:              trap #0
-.short 0x4
+.data2 0x4
                        bcc     1f
                        jmp     cerror
 1: