.title pst v095a11 permanent symbol table .ident /03apr4/ ; copyright 1972 digital equipment corporation ; 15 nov 72 .mcall (at) always always .globl wrdsym ;pointer to .word dr1= 200 ;destructive reference in first field dr2= 100 ;destructive reference in second field .globl dflgdg, dflgev, dflgbm, dflcnd, dflmac, dflsmc dflgdg= 040 ;data generating directive dflgev= 020 ;directive requires even location dflgbm= 010 ;directive uses byte mode dflcnd= 004 ;conditional directive dflmac= 002 ;macro directive dflsmc= 001 ;mcall .if df pal11r ;pal11r subset xmacro= 0 x40= 0 x45= 0 .endc .if df x40&x45 xfltg= 0 x4045= 0 .endc .iif df x45!xfltg, x45flt= 0 .iif df x40!xfltg, x40flt= 0 .iif df xmacro, xsml= 0 .macro opcdef name, class, value, flags, cond aaaa = 0 .if nb cond aaaa = 1 .endc ;.if ndf cond ; this assembler can assemble for any pdp-11 .rad50 /name/ .byte flags+aaaa .globl opcl'class .byte 200+opcl'class .word value ;.endc .endm .macro dirdef name, flags, cond .rad50 /.'name/ .byte flags+0, 0 .if df cond .globl opcerr .word opcerr .iff .globl name .word name .endc .endm ;.psect pstsec con, shr ;pst is shareable .psect pstsec con ; << not in v7 unix it aint! entsec pstsec opcdef , 01, 170600, dr1, x45flt opcdef , 01, 170600, dr1, x45flt opcdef , 01, 005500, dr1 opcdef , 01, 105500, dr1 opcdef , 02, 060000, dr2 opcdef , 11, 172000, dr2, x45flt opcdef , 11, 172000, dr2, x45flt opcdef , 09, 072000, dr2, x4045 opcdef , 09, 073000, dr2, x4045 opcdef , 01, 006300, dr1 opcdef , 01, 106300, dr1 opcdef , 01, 006200, dr1 opcdef , 01, 106200, dr1 opcdef , 04, 103000, opcdef , 04, 103400, opcdef , 04, 001400, opcdef , 04, 002000, opcdef , 04, 003000, opcdef , 04, 101000, opcdef , 04, 103000, opcdef , 02, 040000, dr2 opcdef , 02, 140000, dr2 opcdef , 02, 050000, dr2 opcdef , 02, 150000, dr2 opcdef , 02, 030000, opcdef , 02, 130000, opcdef , 04, 003400, opcdef , 04, 103400, opcdef , 04, 101400, opcdef , 04, 002400, opcdef , 04, 100400, opcdef , 04, 001000, opcdef , 04, 100000, opcdef , 00, 000003, opcdef
, 04, 000400, opcdef , 04, 102000, opcdef , 04, 102400, opcdef , 01, 004700, opcdef , 00, 000257, opcdef , 00, 170000, , x45flt opcdef , 00, 000241, opcdef , 00, 000250, opcdef , 01, 005000, dr1 opcdef , 01, 105000, dr1 opcdef , 01, 170400, dr1, x45flt opcdef , 01, 170400, dr1, x45flt opcdef , 00, 000242, opcdef , 00, 000244, opcdef , 02, 020000, opcdef , 02, 120000, opcdef , 11, 173400, , x45flt opcdef , 11, 173400, , x45flt opcdef , 00, 000254, opcdef , 01, 005100, dr1 opcdef , 01, 105100, dr1 opcdef , 01, 005300, dr1 opcdef , 01, 105300, dr1 opcdef
, 07, 071000, dr2, x4045 opcdef , 11, 174400, dr2, x45flt opcdef , 11, 174400, dr2, x45flt opcdef , 06, 104000, opcdef , 03, 075000, dr1, x40flt opcdef , 03, 075030, dr1, x40flt opcdef , 03, 075020, dr1, x40flt opcdef , 03, 075010, dr1, x40flt opcdef , 00, 000000, opcdef , 01, 005200, dr1 opcdef , 01, 105200, dr1 opcdef , 00, 000004, opcdef , 01, 000100, opcdef , 05, 004000, dr1 opcdef , 11, 177400, dr2, x45flt opcdef , 11, 177400, dr2, x45flt opcdef , 14, 177000, dr2, x45flt opcdef , 14, 177000, dr2, x45flt opcdef , 14, 177000, dr2, x45flt opcdef , 14, 177000, dr2, x45flt opcdef , 11, 172400, dr2, x45flt opcdef , 14, 176400, dr2, x45flt opcdef , 11, 172400, dr2, x45flt opcdef , 01, 170100, , x45flt opcdef , 00, 170004, , x45flt opcdef , 00, 170003, , x45flt opcdef , 10, 006400, , x45 opcdef , 01, 106500, , x45 opcdef , 01, 006500, , x4045 opcdef , 11, 171400, dr2, x45flt opcdef , 11, 171400, dr2, x45flt opcdef , 02, 010000, dr2 opcdef , 02, 110000, dr2 opcdef , 01, 106600, dr1, x45 opcdef , 01, 006600, dr1, x4045 opcdef , 07, 070000, dr2, x4045 opcdef , 11, 171000, dr2, x45flt opcdef , 11, 171000, dr2, x45flt opcdef , 01, 005400, dr1 opcdef , 01, 105400, dr1 opcdef , 01, 170700, dr1, x45flt opcdef , 01, 170700, dr1, x45flt opcdef , 00, 000240, opcdef , 00, 000005, opcdef , 00, 000207, opcdef , 01, 006100, dr1 opcdef , 01, 106100, dr1 opcdef , 01, 006000, dr1 opcdef , 01, 106000, dr1 opcdef , 00, 000002, opcdef , 03, 000200, dr1 opcdef , 00, 000006, opcdef , 01, 005600, dr1 opcdef , 01, 105600, dr1 opcdef , 00, 000277, opcdef , 00, 000261, opcdef , 00, 000270, opcdef , 00, 170011, , x45flt opcdef , 00, 170001, , x45flt opcdef , 00, 170002, , x45flt opcdef , 00, 170012, , x45flt opcdef , 00, 000262, opcdef , 00, 000264, opcdef , 08, 077000, dr1, x4045 opcdef , 13, 000230, , x45 opcdef , 00, 170005, , x45flt opcdef , 00, 170006, , x45flt opcdef , 12, 176000, dr2, x45flt opcdef , 12, 175400, dr2, x45flt opcdef , 12, 175400, dr2, x45flt opcdef , 12, 176000, dr2, x45flt opcdef , 12, 175400, dr2, x45flt opcdef , 12, 175400, dr2, x45flt opcdef , 12, 174000, dr2, x45flt opcdef , 12, 175000, dr2, x45flt opcdef , 12, 174000, dr2, x45flt opcdef , 01, 170200, dr1, x45flt opcdef , 00, 170007, , x45flt opcdef , 01, 170300, dr1, x45flt opcdef , 02, 160000, dr2 opcdef , 11, 173000, dr2, x45flt opcdef , 11, 173000, dr2, x45flt opcdef , 01, 000300, dr1 opcdef , 01, 006700, dr1, x4045 opcdef , 06, 104400, opcdef , 01, 005700, opcdef , 01, 105700, opcdef , 01, 170500, , x45flt opcdef , 01, 170500, , x45flt opcdef , 00, 000001, opcdef , 05, 074000, dr2, x4045 dirdef , dflgbm dirdef , dflgbm!dflgdg dirdef , , xrel dirdef dirdef , dflgev dirdef , dflgbm!dflgdg dirdef , , xrel dirdef dirdef dirdef dirdef , dflcnd dirdef , dflmac, xmacro dirdef , dflmac, xmacro dirdef dirdef dirdef dirdef , dflgev!dflgdg, xfltg dirdef , dflgev!dflgdg, xfltg dirdef , , xrel dirdef dirdef , dflcnd dirdef , dflcnd dirdef , dflcnd dirdef , dflcnd dirdef , dflcnd dirdef , dflcnd dirdef , dflcnd dirdef , dflcnd dirdef , dflcnd dirdef , dflcnd dirdef , dflcnd dirdef , dflcnd dirdef , dflcnd dirdef , dflcnd dirdef , dflcnd dirdef , dflcnd dirdef dirdef , dflmac, xmacro dirdef , dflmac, xmacro dirdef , dflgev!dflgdg, xrel dirdef dirdef , dflmac, xmacro dirdef , dflmac, xmacro dirdef , dflsmc, xsml dirdef , , xmacro dirdef , , xmacro dirdef , , xmacro dirdef dirdef , , xmacro dirdef dirdef dirdef dirdef dirdef dirdef , dflgev!dflgdg dirdef dirdef , dflmac, xmacro dirdef dirdef wrdsym: dirdef <word >, dflgev!dflgdg xitsec .end