BSYSDEPV1.0 4-APR-1994 16:36DEC C V1.3-000A INPUT_BUFFER_LEN SHELL_PID $READONLY$$BSS$4$DATA$P$LINK$ $LITERAL$i$CODE$ $ABS$ DECC$EXIT DECC$GETENV SEARCH_STR SEARCH_DIR STARTING_LINECASE_SENSITIVE NUM_LINES ACTUAL_LINESCURS_ROWCURS_COLCURS_POS SQUEEZE_LINES MOST_L_OPT MOST_V_OPT MOST_B_OPT MOST_T_OPT MOST_W_OPT MOST_S_OPT MOST_K_OPT MOST_D_OPTDECC$GA_STDERR DECC$GA_STDINDECC$GA_STDOUT DECC$GFPRINTF DECC$GSPRINTF DECC$GSSCANF0  SHELL_PID8JDEFINE_LOGICAL_NAME8J (DELETE_LOGICAL_NAME8JDO_EMACS_COMMAND8JP`DO_SHELL_COMMAND8JEXPAND_FILE_NAME0Jp UNIX2VMS8 INPUT_BUFFER_LEN  P INPUT_BUFFER0 INPUT_BUFFER0JxINIT_TTY0Jhh RESET_TTY(JH GETKEY0J UNGETKEY8J GET_TERM_DIMENSIONS0J SYS_DELETE_FILE0Jp SET_WIDTH0J hGET_TIME WIDE_WIDTH NARROW_WIDTH SEND_STRING_TO_TERM TERM_CANNOT_INSERT TERM_CANNOT_SCROLL SCREEN_WIDTH SCREEN_HEIGHT SCREEN_ROWS TT_BOLD_STR TT_ULIN_STR TT_NORM_STR TT_REVV_STR CURS_F_STRBUFBEGEOBMINI_BUFC_POSC_LINEWINTOP_WINCOLUMN RESTORE_WIDTH_TOMESSAGEREDRAW_DISPLAY  TTY_CHANNEL_GLOBAL8 TTY_CHANNEL_GLOBAL DECC$STRLEN DECC$STRCPYLIB$SET_LOGICAL LIB$DELETE_LOGICAL LIB$ATTACH DECC$GETPPID LIB$SPAWN DECC$STRCMP LIB$FIND_FILE_END LIB$FIND_FILE DECC$MEMCPY SYS$ASSIGN SYS$DCLEXH0J p SYS_GETKEYSYS$QIOW SYS$GETDVIW DECC$DELETE(J` LOCATE DECC$TIME DECC$CTIME SYS$DASSGN $=  $=  = LNM$JOBLNM$JOB%X= MOST > (= EMACS_PID@=@7Spawning MOST DCL SUBPROCESS (Logout when finished)...x=0'Unable to spawn subprocess. Error = %X=(SYS$DISK:[]*.*;4== SYS$ERROR=8*Unable to assign input channel SYS$ERROR= SYS$ERROR66=6 =(=  =0(;=`< ;= DECC$STRLEN DECC$STRCPY LIB$SET_LOGICAL;==0(;=P SYS$QIOW DECC$EXIT WIDE_WIDTH=  NARROW_WIDTH7 SCREEN_WIDTHREDRAW_DISPLAY SYS$DASSGN SYS$ASSIGN=0h;=0  DECC$CTIME DECC$TIME=0 ;=0 ;=0 =0 ;=  DECC$DELETE=08 ;=( P  SYS$GETDVIW=0 ;7 INPUT_BUFFER;=0p;=0 7TTY_CHANNEL_GLOBAL=0 ;=@ =0h;=0;=0  DECC$GFPRINTF7DECC$GA_STDERR SYS$DCLEXHh;=0;=P< ! DECC$STRCMP=# DECC$MEMCPY% LIB$FIND_FILE 'LIB$FIND_FILE_END=0h`;= ;) LIB$ATTACH+MESSAGE- DECC$GETPPID/ DECC$GSPRINTF1 LIB$SPAWN 3SEND_STRING_TO_TERM=0;=0 5 DECC$GSSCANF7 DECC$GETENV=0(;=@ 9LIB$DELETE_LOGICAL =#4G~(^0^8~@HPGGG0B 8bG@Zk4G(`H0B G1?J8b F= @ZkTGG@B1?Jhb`H`E" F=}G]GHb @ZkTG@B" =Hb@ZkGGGPB"Xb="]"@ZkG(]0]8}@HP`#kG#4G~^ ^(~0GGGBGb@ZkTG"@b`H B"GH2_J=s"(b@F]=" }}@ZkG] ](}0@#k#4G~^^ (GG0B8b0!G@ZktG B(b/"]"G@Zk4GB"b@Zk5@GG]] (0#kp#G~h^p^x~GG#bPBc Xb }@Zk"@@"D G "?"BBF G0B4G8b@Zk=("4G8 D( Bb@ZkGGG pB]"GtG ^ Gxb@ZktG]`#""5@B_B D `Bhb@Zk4GTG@BHb"@ZkG@B"HbGTG@Zk4GGh]p]x}#k#TG~^ ^(~08@GG#G@G(B8"  %"0b=G =G@Zk4G%" hBpb@ZkhBGpbGTG@Zk4GXBG`b@Zk%e"="XBE"a H`b1?J"!F=~G%"GGG@Zk$c tGD %`%,HBGPb%HG@Zk4Ge,eH@#,A#H#<G$.GQ$J$>G] ](}08@P#kG#G~G^G^ ~(GG"bH"",c = }Bb@ZkTG8D8" (B0b#"@ZkG4G(B0b@ZkHB"X"4GPb#@ZkdG]] }(0#kGk# ;~^ G#!.!J @;"4Gp[1&J! &J>}" Gx{tG(GGG@ZkG] 0# HHk,@ HDG#~^ ^(~08GG#b"!.!Ji ""4GHB1&J! &J>}" GPbtG(GGG@Zk HHD HE"$1@3q@ @.!"GQJ'J9,+`G."/a#"JXKyJ"G?"A/A .@B,[KUJa,vtKHF>/yJbHA#XKbzHG?, SB! DB@HD< Ga/"/0@B DBpKXKyaKG?! _ 'JG] ]H(}08@#k,@ HDG[ G3q @ 3@0 #"`."" BVJ.JTJxJF>".xJWJF>".xJWJF>".xJ" !BWJF> 3B .5#u.0 BJSyJtK !BtFy>".xJ0 @TJF> k#G~G8^@^HGG#}"(B0" "(0B=]B R",] =(]"GG8b@Zk0= &HH0D BGb4G@ZkG8]@]HP#k#4G~^ [({G@ZkG]0@ #kGG_1,Q"0@1"R2H"GJPF @ q.0@1"RtJGJPF@PF_FkG#G~^^~ (GGGG. "0 @ QJ`"'Jx+F @.0 @ QSJ'Jx+F _x+F?F GGGGS.3"0Bs"RQJ3 GJ @EF3.0Bs"R!JGJEF@?EF_FGGGGq.Q"0 @1"SrJ"gJ `XgFQ.0 @1"SPJgJXgF`XgFFGF ,D "1q @PH 1@JG"-, .vJ# UJ3#F>.@B.JUJvKF>. .JUJv K"F> /s"."KUJvK"F>3/ QB ABP7KJG.yJs" WJ0@BF>S/ AB"P@KJBGbG4G@Zk 1@"`@G#""G_."a#1@UJJF". 1@"UJJF A/ 1@U[KJF. 1@! UJJF 1@3@ `A/a#2@! U[KJF 1@F`@ G .xJGQ J8F >G4GbtG0@G{#dCtJP.zCy5JRPJd@TFP>/0@CGXKG?. PJJ<B4B< BQjaCdJ/XKG?0 @_z@0@C."PJJGG]]} ( =0#kCaCx J.0 @WJF>z@0@C,9#YH'K%G @!1 @aCG/vJXKG?%G+GaC 4G,"H؅F!1 @aCG/dJXKG?aCd9J.TJF>GaC@x5J.WJF>8@Gz@4G . aCw9JJXF.VJF>!1 @aC4G,#HG!1 @aCG.wJVJF>#G~4G^^ GG0B8b@Zk4G B(b"@Zk ,A H <G]] 0#kG#"~G(^0^8~@HGG#GP" = = `Bhb@Zk@BGHbG@Zkp"B="bG`GG@Zk4G0D 0B8bG@ZkG=}" BG 1&JG&J G(bG(G@ZktGGGpS`H B}"(bG!vH0DG=G1&J &J(@Zk4GGBb0JJ@Zk4G0D0BG8b@Zk GBb@ZkG(]0]8}@HP#k40GD DECC$STRLEN48b# DECC$STRLEN4@@D DECC$STRLEN4PG| DECC$STRLEN4db# DECC$STRLEN4x@| DECC$STRLEN4G DECC$STRCPY4b# DECC$STRCPY4@ DECC$STRCPY4G DECC$STRCPY4b# DECC$STRCPY4@ DECC$STRCPY4GLIB$SET_LOGICAL4b#LIB$SET_LOGICAL4@LIB$SET_LOGICAL4PG` DECC$STRLEN4Xb#  DECC$STRLEN4\@` DECC$STRLEN<9pGLIB$DELETE_LOGICAL<:b# LIB$DELETE_LOGICAL<9@LIB$DELETE_LOGICAL47G DECC$GETENV48b# DECC$GETENV47@ DECC$GETENV45 G$ DECC$GSSCANF46b# DECC$GSSCANF45 @$ DECC$GSSCANF4)(G8 LIB$ATTACH4*0b# LIB$ATTACH4)4@8 LIB$ATTACH4-G DECC$GETPPID4.b#P DECC$GETPPID4-@ DECC$GETPPID4)G LIB$ATTACH4*b#P LIB$ATTACH4)@ LIB$ATTACH<3G(SEND_STRING_TO_TERM<4b#PSEND_STRING_TO_TERM<3$@(SEND_STRING_TO_TERM418Gl LIB$SPAWN42db#P LIB$SPAWN41h@l LIB$SPAWN4/G DECC$GSPRINTF40b#P DECC$GSPRINTF4/@ DECC$GSPRINTF,+GMESSAGE,,b#PMESSAGE,+@MESSAGE,+GMESSAGE,,b#PMESSAGE,+@MESSAGE4!0G` DECC$STRCMP4"Db# DECC$STRCMP4!\@` DECC$STRCMP<'tGLIB$FIND_FILE_END<(xb#LIB$FIND_FILE_END<'|@LIB$FIND_FILE_END4G DECC$STRCPY 4b# DECC$STRCPY4@ DECC$STRCPY4G DECC$STRLEN4b# DECC$STRLEN4@ DECC$STRLEN4%G LIB$FIND_FILE4&b# LIB$FIND_FILE4%@ LIB$FIND_FILE4#G4 DECC$MEMCPY4$$b# DECC$MEMCPY4#0@4 DECC$MEMCPY4G SYS$ASSIGN4b#x SYS$ASSIGN4@ SYS$ASSIGN4G DECC$GFPRINTF4b#x DECC$GFPRINTF4 @ DECC$GFPRINTF4 G$ DECC$EXIT4 b#x DECC$EXIT4  @$ DECC$EXIT4,GH SYS$DCLEXH4 <b#x SYS$DCLEXH4D@H SYS$DCLEXH4GSYS$QIOW4{# SYS$QIOW4@SYS$QIOW4tGSYS$QIOW4b#HSYS$QIOW4@SYS$QIOW4X G SYS$GETDVIW4 b# SYS$GETDVIW4 @ SYS$GETDVIW4  G DECC$EXIT4  b# DECC$EXIT4  @ DECC$EXIT4 G DECC$DELETE4 {# DECC$DELETE4 @ DECC$DELETE4 G DECC$STRLEN4 b#p DECC$STRLEN4@ DECC$STRLEN4G DECC$TIME4b#  DECC$TIME4@ DECC$TIME4G DECC$CTIME4b#  DECC$CTIME4@ DECC$CTIME4 (G4 NARROW_WIDTH4,b#p NARROW_WIDTH4 0@4 NARROW_WIDTH4 8GL WIDE_WIDTH4 @b#p WIDE_WIDTH4 H@L WIDE_WIDTH4TGt SYS$ASSIGN4\b#p SYS$ASSIGN4p@t SYS$ASSIGN4 G DECC$EXIT4 b#p DECC$EXIT4 @ DECC$EXIT4GSYS$QIOW4b#pSYS$QIOW4@SYS$QIOW4GDSYS$QIOW4b#pSYS$QIOW4@@DSYS$QIOW4PGd SYS$DASSGN4Tb#p SYS$DASSGN4`@d SYS$DASSGN4 pG DECC$EXIT4 xb#p DECC$EXIT4 |@ DECC$EXIT4GREDRAW_DISPLAY4b#pREDRAW_DISPLAY4@REDRAW_DISPLAY ==-%$SYSDEPDEC C V1.3-000A =  44=!define_logical_name4=}|            ( $= 04 = ( =  (4 4=!delete_logical_name(4=d\[          $= P4 =  = 44=do_emacs_command4=/'&    $= 4 =  = `4P4=do_shell_command`4=            $= 4 =  <= 44=expand_file_name4=                D      ( $=  4 =  = 4x4=init_tty4=yqp j j j j m n m p p y y) $= 4 .=  4=  =  =  v= h4h4= reset_ttyh4=  =  = p4 4= sys_getkeyp4='    $= 4 =  =  4H4= getkey 4=nfe     < D    (  $= H4 .=  4=  =  =  =  44=ungetkey 4=]UT   X       =  =   44=!get_term_dimensions 4=qih             $= @ 4 =  =  44=sys_delete_file 4=0(' 1 1 1 1 $=  4 = @ u=  4`4= locate 4= B = ` l=  4p4=unix2vms 4=  G B C B  B X ] _ ] e e e| f* h/$ m v      $=  4 .=   4=  =  .=   4=  =  .=   4=  =  =  = h4 4=get_timeh4=3+* N N N S $= 4 = p C= 4p4= set_width4= \  \ \ c \ j q t y | | | |T |           $= 4 =  =