From bbed2274c041ca331888d900ede0c7eaab2afa3d Mon Sep 17 00:00:00 2001 From: Lars Brinkhoff Date: Fri, 9 Feb 2024 18:48:27 +0100 Subject: [PATCH] Fix conditional brackets in XQUEUE. The QUEFIL routine has been conditionalized for MIT, but the brackets are in the wrong place. This results in the MOVEI B,DEVICE being dropped, resulting in garbage being passed in B to RFN"PFN. XQUEUE then writes a nonsensical file name to the .XGPR. queue file, and XGPSPL picks this up and prints it on its console. --- src/sysen2/{xqueue.297 => xqueue.298} | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) rename src/sysen2/{xqueue.297 => xqueue.298} (100%) diff --git a/src/sysen2/xqueue.297 b/src/sysen2/xqueue.298 similarity index 100% rename from src/sysen2/xqueue.297 rename to src/sysen2/xqueue.298 index 04df3310..b651422d 100644 --- a/src/sysen2/xqueue.297 +++ b/src/sysen2/xqueue.298 @@ -1074,13 +1074,13 @@ repeat 2,[push p,y ; save rest of date ;Output the filenames into the queue file. quefil: - move b,device ifn mit,[ + move b,device move a,machin camn b,['DSK,,] movem a,device - movei b,device ] + movei b,device move d,[440700,,fnmbuf] pushj p,rfn"pfn ; Convert text file name to a string. move d,[440700,,fnmbuf]