From 0665e4098f71414ef6e8eb87eb7d9e28781eccad Mon Sep 17 00:00:00 2001
From: Richard Cornwell <rich@sky-visions.com>
Date: Tue, 9 May 2023 13:45:18 -0400
Subject: [PATCH] IBM360: Cleanup more Windows warnings.

---
 IBM360/ibm360_chan.c | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/IBM360/ibm360_chan.c b/IBM360/ibm360_chan.c
index 04b16dff..cf9c07ee 100644
--- a/IBM360/ibm360_chan.c
+++ b/IBM360/ibm360_chan.c
@@ -1537,11 +1537,11 @@ set_dev_addr(UNIT * uptr, int32 val, CONST char *cptr, void *desc)
     DEVICE             *dptr;
     struct _dev        *dev;
     DIB                *dibp;
-    t_value             newdev;
+    uint16              newdev;
     struct _dev        *ndev;
     t_stat              r;
     unsigned int        i;
-    t_value             devaddr;
+    uint16              devaddr;
 
     if (cptr == NULL)
         return SCPE_ARG;
@@ -1555,7 +1555,7 @@ set_dev_addr(UNIT * uptr, int32 val, CONST char *cptr, void *desc)
     if (dibp == NULL)
         return SCPE_IERR;
 
-    newdev = get_uint (cptr, 16, 0xfff, &r);
+    newdev = (uint16)(get_uint (cptr, 16, 0xfff, &r) & 0xfff);
 
     if (r != SCPE_OK)
         return r;