diff --git a/PDP10/kx10_lp.c b/PDP10/kx10_lp.c index ebb625ff..25e2d7cb 100644 --- a/PDP10/kx10_lp.c +++ b/PDP10/kx10_lp.c @@ -393,6 +393,7 @@ t_stat lpt_attach (UNIT *uptr, CONST char *cptr) { t_stat reason; + sim_switches |= SWMASK ('A'); /* Position to EOF */ reason = attach_unit (uptr, cptr); if (sim_switches & SIM_SW_REST) return reason; diff --git a/PDP10/kx10_pt.c b/PDP10/kx10_pt.c index 7f31db81..d5a40089 100644 --- a/PDP10/kx10_pt.c +++ b/PDP10/kx10_pt.c @@ -209,6 +209,7 @@ t_stat ptp_attach (UNIT *uptr, CONST char *cptr) { t_stat reason; + sim_switches |= SWMASK ('A'); /* Default to Append to existing file */ reason = attach_unit (uptr, cptr); uptr->STATUS &= ~NO_TAPE_PP; return reason; @@ -409,6 +410,7 @@ fprintf (st, "Paper Tape Punch (PTP)\n\n"); fprintf (st, "The paper tape punch (PTP) writes data to a disk file. The POS register\n"); fprintf (st, "specifies the number of the next data item to be written. Thus, by changing\n"); fprintf (st, "POS, the user can backspace or advance the punch.\n"); +fprintf (st, "A new file can be created if you attach with the -N switch\n\n"); fprint_set_help (st, dptr); fprint_show_help (st, dptr); fprint_reg_help (st, dptr);