From 4a45fda6729155e3dd64f467247d4115189f5f77 Mon Sep 17 00:00:00 2001
From: Mark Pizzolato <mark@infocomm.com>
Date: Mon, 28 Feb 2022 10:12:33 -0800
Subject: [PATCH] SCP: assure that t_stat is returned in sim_call_argv()

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

diff --git a/scp.c b/scp.c
index a1c450ea..2fdc7816 100644
--- a/scp.c
+++ b/scp.c
@@ -4300,8 +4300,7 @@ char **argv = (char **)calloc ((1 + argc), sizeof (*argv));
 size_t cptr_len = strlen (cptr);
 char *argline = (char *)malloc (2 + 2 * cptr_len);
 char *cp, quote;
-int result;
-t_stat r = SCPE_OK;
+t_stat result = SCPE_OK;
 
 if ((argv == NULL) || (argline == NULL)) {
     free (argv);
@@ -4341,7 +4340,7 @@ while (*cp) {
         *cp++ = '\0';
     }
 if (argv != NULL)
-    result = main_like_routine (argc, argv);
+    result = (t_stat)main_like_routine (argc, argv);
 free (argline);
 free (argv);
 return result;