*** empty log message ***

diff --git a/mach/i86/libsys/head_em.s b/mach/i86/libsys/head_em.s
new file mode 100644 (file)
index 0000000..fd45fde
--- /dev/null
+++ b/mach/i86/libsys/head_em.s
@@ -0,0 +1,75 @@
+.define begtext,begdata,begbss
+.define hol0,.reghp,.limhp,.trppc,.ignmask
+.define ERANGE,ESET,EHEAP,ECASE,EILLINS
+
+ERANGE          = 1
+ESET            = 2
+EIDIVZ          = 6
+EHEAP           = 17
+EILLINS         = 18
+EODDZ           = 19
+ECASE           = 20
+
+base            = 0x01C0
+topmem          = 0xFFF0
+
+       .org    topmem-16
+.extern __n_line
+maxmem:
+__n_line:
+       .space  16
+       .errnz  __n_line-0xFFE0
+
+       .base   base
+
+       .text
+begtext:
+       cld
+       xor     ax,ax
+       mov     ss,ax
+       mov     ds,ax
+       mov     es,ax
+       mov     (2),cs
+       mov     (0),.diverr
+       mov     sp,maxmem
+       mov     di,begbss
+       mov     cx,[[endbss-begbss]/2]&0x7FFF
+       ! xor     ax,ax ! ax still is 0
+       rep stos
+       mov     ax,envp
+       push    ax
+       mov     ax,argv
+       push    ax
+       mov     ax,1
+       push    ax
+       call    _m_a_i_n
+       call    .stop
+.diverr:
+       push    ax
+       mov     ax,EIDIVZ
+       call    .error
+       pop     ax
+       iret
+
+       .data
+begdata:
+hol0:
+       .word   0,0
+       .word   0,0
+argv:
+       .word   3f
+envp:
+       .word   0
+3:
+       .asciz "PROGRAM"
+.reghp:
+       .word   endbss
+.limhp:
+       .word   endbss
+.ignmask:
+       .word   0
+.trppc:
+       .word   0
+
+       .bss
+begbss: