From 415b2ef1bca94364fb70a7386cf72b4b8c417267 Mon Sep 17 00:00:00 2001
From: Mark Pizzolato <mark@infocomm.com>
Date: Tue, 12 Sep 2017 10:59:55 -0700
Subject: [PATCH] SCP: Fix register examine broken by prior Coverity fix.

---
 scp.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/scp.c b/scp.c
index ea2bd636..7b0d3388 100644
--- a/scp.c
+++ b/scp.c
@@ -7228,7 +7228,7 @@ for (rptr = lowr; rptr <= highr; rptr++) {
     for (idx = lows; idx <= highs; idx++) {
         if (idx >= rptr->depth)
             return SCPE_SUB;
-        sim_eval[0] = get_rval (rptr, idx);
+        sim_eval[0] = val = get_rval (rptr, idx);
         sim_switches = saved_switches;
         if (schptr && !test_search (sim_eval, schptr))
             continue;