From 7bb96070f165f478f63e7372d53391b7bc413105 Mon Sep 17 00:00:00 2001
From: Mark Pizzolato <mark@infocomm.com>
Date: Mon, 27 Sep 2021 21:39:58 -0700
Subject: [PATCH] TAPE: Fix test logic to properly detach tested unit

As reported by Larry Baker
---
 sim_tape.c | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/sim_tape.c b/sim_tape.c
index e4bff1f3..73a7e0a3 100644
--- a/sim_tape.c
+++ b/sim_tape.c
@@ -4240,7 +4240,7 @@ for (t = classify_tests; t->testname != NULL; t++) {
         r = attach_cmd (0, args);
         if (r != SCPE_OK)
             return sim_messagef (r, "ATTACH %s failed\n", args);
-        detach_unit (uptr);
+        detach_cmd (0, sim_uname (uptr));
         }
     if (t->fail_attach_args) {
         char args[CBUFSIZE*2];
@@ -4249,7 +4249,7 @@ for (t = classify_tests; t->testname != NULL; t++) {
         snprintf (args, sizeof (args), "%s %s %s", sim_uname (uptr), t->fail_attach_args, t->testname);
         r = attach_cmd (0, args);
         if (r == SCPE_OK) {
-            detach_unit (uptr);
+            detach_cmd (0, sim_uname (uptr));
             return sim_messagef (r, "** UNEXPECTED ATTACH SUCCESS ** %s\n", args);
             }
         }