diff --git a/build/misc.tcl b/build/misc.tcl index 80b8d0f4..2688affc 100644 --- a/build/misc.tcl +++ b/build/misc.tcl @@ -832,16 +832,9 @@ respond "*" ":midas sys1;ts pty_sysen1;pty\r" expect ":KILL" # PRUFD -respond "*" ":midas sysbin;prufd bin_sysen2;prufd\r" +respond "*" ":midas sys1;ts prufd_sysen2;prufd\r" expect ":KILL" -# patch PRUFD to use the TTY: device rather than the LPT: device -respond "*" ":job prufd\r" -respond "*" ":load sysbin;prufd bin\r" -respond "*" "nlinks+14/ A,,646471\r" -type ":pdump sys1;ts prufd\r" -respond "*" ":kill\r" - # udir respond "*" ":midas sys3;ts nudir_sysen3; nudir\r" expect ":KILL" diff --git a/src/sysen2/prufd.10 b/src/sysen2/prufd.11 similarity index 99% rename from src/sysen2/prufd.10 rename to src/sysen2/prufd.11 index cba6c33d..6c263239 100644 --- a/src/sysen2/prufd.10 +++ b/src/sysen2/prufd.11 @@ -62,7 +62,7 @@ PDL: BLOCK LPDL+1 ;INITIALIZE -PRINI: .OPEN LPTC,[1,,SIXBIT / LPTPRUFD WPAPER/] +PRINI: .OPEN LPTC,[1,,SIXBIT / TTYPRUFD WPAPER/] .VALUE ;LPT NOT AVAILABLE IRPS NAME,,[USER BLOCKS LINKS] MOVE AA,[SIXBIT /NAME/]