From 72c65ad7a4d5ad1711a82e6230ba1655ba610ed5 Mon Sep 17 00:00:00 2001
From: Mark Pizzolato <mark@infocomm.com>
Date: Sat, 8 Dec 2012 15:22:27 -0800
Subject: [PATCH] Changed UNLOAD to be an illegal operation if issued on an RM
 device and made UNLOAD on RP devices execute immediately (as suggested by Bob
 Supnik)

---
 PDP11/pdp11_rp.c | 11 +++++++----
 1 file changed, 7 insertions(+), 4 deletions(-)

diff --git a/PDP11/pdp11_rp.c b/PDP11/pdp11_rp.c
index d3fe3d8d..8f374aa1 100644
--- a/PDP11/pdp11_rp.c
+++ b/PDP11/pdp11_rp.c
@@ -1025,6 +1025,13 @@ switch (fnc) {                                          /* case on function */
         return SCPE_OK;
 
     case FNC_UNLOAD:                                    /* unload */
+        if (drv_tab[dtype].ctrl == RM_CTRL) {           /* RM? */
+            rp_set_er (ER1_ILF, drv);                   /* not supported */
+            break;
+            }
+        rp_detach (uptr);                               /* detach unit */
+        return SCPE_OK;
+
     case FNC_RECAL:                                     /* recalibrate */
         dc = 0;                                         /* seek to 0 */
     case FNC_SEEK:                                      /* seek */
@@ -1138,10 +1145,6 @@ if (!uptr->io_complete) { /* Top End (I/O Initiation) Processing */
             rp_update_ds (DS_ATA, drv);
             break;  
 
-        case FNC_UNLOAD:                                /* unload */
-            rp_detach (uptr);                           /* detach unit */
-            break;
-
         case FNC_RECAL:                                 /* recalibrate */
         case FNC_SEARCH:                                /* search */
         case FNC_SEEK:                                  /* seek */