mach/vax4/libbsd4_1a/head_em.s

   1 #include "em_abs.h"
   2 .sect .text; .sect .rom; .sect .data; .sect .bss
   3 .sect .text
   4
   5         ! $Id: head_em.s,v 1.10 1994/06/24 13:49:24 ceriel Exp $
   6
   7 .define hol0
   8 .define .reghp
   9 .define .limhp
  10 .define .trppc
  11 .define .trpim
  12 .define EXIT, BRK, WRITE
  13
  14         ! run time startoff
  15         .data2  0
  16         bispsw  $0100           ! set FU(0100)
  17         movl    4(sp),r0
  18         clrl    -4(r0)
  19         movl    sp,r0
  20         movl    (r0)+,r1
  21         movl    r0,r2
  22 1:
  23         tstl    (r0)+
  24         bneq    1b
  25         cmpl    r0,(r2)
  26         blssu   2f
  27         tstl    -(r0)
  28 2:
  29         pushl   r0
  30         pushl   r2
  31         pushl   r1
  32         calls   $3,__m_a_i_n
  33 EXIT:
  34         movl    $Im2,ap
  35         movl    r0,6(ap)
  36         chmk    (ap)+
  37         halt
  38
  39 break = 17
  40
  41 .align  1
  42 BRK:
  43         .data2  0x0000
  44         chmk    $break
  45         bcc     1f
  46         jmp     errmon
  47 1:
  48         movl    4(ap),.limhp
  49         clrl    r0
  50         ret
  51
  52 write = 4
  53
  54 .align  1
  55 WRITE:
  56         .data2  0x0000
  57         chmk    $write
  58         bcc     1f
  59         jmp     errmon
  60 1:
  61         ret
  62
  63         .sect .data
  64 Im2:
  65         .data2  1
  66         .data4  1
  67         .data4  0
  68         .data2  0
  69 .reghp:
  70         .data4  __end
  71 .limhp:
  72         .data4  __end
  73 hol0:
  74         .space  8
  75 .trppc:
  76         .space  4
  77 .trpim:
  78         .data4  0