From d8b6a70c54fc8d9b202c3bccd99b9f5ab99df035 Mon Sep 17 00:00:00 2001
From: Mark Pizzolato <mark@infocomm.com>
Date: Tue, 26 Mar 2019 14:05:37 -0700
Subject: [PATCH] SCP: Add support for optional -D (debig) switch when running
 library tests (-T)

---
 scp.c | 5 +++++
 1 file changed, 5 insertions(+)

diff --git a/scp.c b/scp.c
index c1f2aee9..f798f795 100644
--- a/scp.c
+++ b/scp.c
@@ -14559,6 +14559,11 @@ DEVICE *dptr;
 int32 saved_switches = sim_switches & ~SWMASK ('T');
 t_stat stat = SCPE_OK;
 
+if (sim_switches & SWMASK ('D')) {
+    sim_switches &= ~(SWMASK ('D') | SWMASK ('R') | SWMASK ('F') | SWMASK ('T'));
+    sim_set_debon (0, "STDOUT");
+    sim_switches = saved_switches;
+    }
 for (i = 0; (dptr = sim_devices[i]) != NULL; i++) {
     t_stat tstat = SCPE_OK;