From 6b544073ae203550bfac15d5b914c30b64f95f40 Mon Sep 17 00:00:00 2001 From: Ken Rector Date: Sat, 23 Jul 2022 16:52:50 -0700 Subject: [PATCH] sigma: Fix MT tape mark error handling revised error handling failed to set tape mark status on space file forward/reverse. --- sigma/sigma_bugs.txt | 1 + sigma/sigma_mt.c | 3 +++ 2 files changed, 4 insertions(+) diff --git a/sigma/sigma_bugs.txt b/sigma/sigma_bugs.txt index e3ca048f..a034283e 100644 --- a/sigma/sigma_bugs.txt +++ b/sigma/sigma_bugs.txt @@ -121,6 +121,7 @@ 115. MT: error handling not consistent. 116: IO: dangling else in write direct mode 1 code causes incorrect behavior. 117: CPU: sim_interval is decremented before breakpoint test, which is incorrect. +118. MT: revised error handling failed to set tape mark status on space file forward/reverse. Diagnostic Notes diff --git a/sigma/sigma_mt.c b/sigma/sigma_mt.c index 581b4084..7c7d3f7e 100644 --- a/sigma/sigma_mt.c +++ b/sigma/sigma_mt.c @@ -25,6 +25,7 @@ mt 7320 and 7322/7323 magnetic tape + 20-Jul-22 RMS Space record must set EOF flag on tape mark (Ken Rector) 03-Jul-22 RMS Fixed error in handling of channel errors (Ken Rector) 02-Jul-22 RMS Fixed bugs in multi-unit operation 07-Jun-22 RMS Removed unused variables (V4) @@ -380,6 +381,7 @@ switch (cmd) { /* case on command */ if (CHS_IFERR (st)) /* chan or SCP err? */ return mt_chan_err (dva, st); /* uend and stop */ } + uptr->UST |= MTDV_EOF; /* set eof */ break; case MCM_SBKF: /* space rev file */ @@ -389,6 +391,7 @@ switch (cmd) { /* case on command */ if (CHS_IFERR (st)) /* chan or SCP err? */ return mt_chan_err (dva, st); /* uend and stop */ } + uptr->UST |= MTDV_EOF; /* set eof */ break; case MCM_WTM: /* write eof */