1 " BEGIN INCLUDE FILE bootload_equs.incl.alm
  2 " Created 10/04/80 W. Olin Sibert, mostly from bootstrap1
  3 " Modified by almost everyone, it seems.
  4 " Last modified for MR11 bootload Multics addresses starting in 1983 by
  5 "     Keith Loepere.
  6 "
  7 " This include file describes various things used by the programs in
  8 " bound_bootload_0.
  9 
 10 " Default pointer register usage:
 11 
 12           equ       ds,0                " Descriptor segment
 13           equ       seg2,1              " Another temporary
 14           equ       mb,2                " IOM mailbox
 15           equ       slt,3               " Segment loading table (SLT)
 16           equ       nt,4                " Name_table
 17           equ       prb,5               " Physical_record_buffer
 18           equ       seg,6               " Temporary
 19           equ       fv,7                " Interrupt and fault vectors
 20 
 21 " Macros
 22 
 23           macro     equ_o
 24           maclist   off,save
 25           bool      &U,&2
 26           equ       &1,&U
 27           maclist   restore
 28 &end
 29 
 30           macro     set_o
 31           maclist   off,save
 32           bool      &U,&2
 33           set       &1,&U
 34           maclist   restore
 35 &end
 36 
 37           macro     include_nolist
 38           maclist   off,save
 39           include   &1
 40           maclist   restore
 41 &end
 42 
 43           macro     Bpush
 44           stx2      bootload_0$entry_stack_ptr,id
 45           ttn       bootload_error$out_of_stack
 46 &end
 47 
 48 "         Breturn   offset-from-return-point
 49 
 50           macro     Breturn
 51           ldx2      bootload_0$entry_stack_ptr,di
 52           tra       0+&1,x2
 53 &end
 54 
 55 "         Bentry    name,offset-from-return-point
 56 
 57           macro     Bentry
 58           segdef    &1
 59           macro     &1_return
 60           Breturn   &<&K,2&[0&;&2&]
 61 &&end
 62 &end
 63 
 64 "         Bentry_internal     name,offset_from_return_point
 65 
 66           macro     Bentry_internal
 67           macro     &1_return
 68           Breturn   &<&K,2&[0&;&2&]
 69 &&end
 70 &end
 71 
 72 
 73 " Definitions
 74 
 75           equ_o     bostoe_absloc,10000           " bos_teohold
 76           equ_o     bostoe_lth,2000
 77 
 78           equ_o     fgbx_absloc,24000             " now in bce toehold
 79           equ_o     fgbx_lth,2000
 80 
 81           equ_o     toe_absloc,24000              " bootload Multics toehold
 82           equ_o     toe_lth,4000                  " This starts at a 0 mod 4
 83                                                   " page address.  It is
 84                                                   " bound as first element
 85                                                   " of bound_bootload_0.
 86 
 87           equ_o     bbl0_absloc,24000             " bound_bootload_0 location
 88           equ_o     bbl0_lth,22000                " and length.
 89 
 90           equ_o     toedata_absloc,46000          " toehold_data
 91           equ_o     toedata_lth,4000
 92 
 93           equ_o     upt_absloc,52000              " unpaged_page_tables
 94           equ_o     upt_lth,2000
 95 
 96           equ_o     iupt_absloc,54000             " init_unpaged_page_tables
 97           equ_o     iupt_lth,2000
 98 
 99           equ_o     bkpt_absloc,56000             " breakpoint_page
100           equ_o     bkpt_lth,2000
101 
102           equ_o     prb_absloc,60000              " physical_record_buffer
103           equ_o     prb_lth,6000                  " memory past here up for
104                                                   " grabs
105 
106 " END INCLUDE FILE bootload_equs.incl.alm