From: keie <none@none>
Date: Mon, 7 Jan 1985 15:43:50 +0000 (+0000)
Subject: *** empty log message ***
X-Git-Tag: release-5-5~5803
X-Git-Url: https://git.ndcode.org/public/gitweb.cgi?a=commitdiff_plain;h=dd0951f1146ea6c084b94d18214bb03bfcdc4045;p=ack.git

*** empty log message ***
---

diff --git a/mach/pmds/libsys/head_em.s b/mach/pmds/libsys/head_em.s
new file mode 100644
index 000000000..92d4f2e77
--- /dev/null
+++ b/mach/pmds/libsys/head_em.s
@@ -0,0 +1,58 @@
+.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
+
+
+CERASE	= 010
+CKILL	= 030
+CSTART	= 021
+CSTOP	= 023
+F_DUM	= 0
+
+
+LINO_AD	= 0
+FILN_AD	= 4
+
+EARRAY	= 0
+ERANGE	= 1
+ESET	= 2
+EIDIVZ	= 6
+EHEAP	= 17
+EILLINS	= 18
+ECASE	= 20
+
+	.text
+begtext:
+	add.l	#2,sp !convert argc from 4-byte to 2-byte
+	pea	endbss
+	jsr	_brk
+	add.l	#4,sp
+	jsr	_m_a_i_n
+	add	#010,sp
+EXIT:
+
+	.data
+begdata:
+hol0:
+.lino:
+	.short	0,0	! lino
+.filn:
+	.long	0	! filn
+.reghp:
+	.long	endbss
+.limhp:
+	.long	endbss
+.trppc:
+	.long	0
+.trpim:
+	.short	0
+
+
+	.bss
+begbss: