From bcaed7d0b0fc0a04d8f77896fcd875d46be358e1 Mon Sep 17 00:00:00 2001
From: Anthony Lawrence <al20878@gmail.com>
Date: Tue, 14 Jun 2022 20:21:21 -0700
Subject: [PATCH] SCP: Fix incorrect disk size reporting when t_addr is 32 bits

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

diff --git a/scp.c b/scp.c
index 3597c9fe..e0d4b641 100644
--- a/scp.c
+++ b/scp.c
@@ -6473,10 +6473,10 @@ return SCPE_OK;
 const char *sprint_capac (DEVICE *dptr, UNIT *uptr)
 {
 static char capac_buf[MAX_WIDTH + 12];
-t_addr kval = (uptr->flags & UNIT_BINK)? 1024: 1000;
-t_addr mval;
+t_offset kval = (uptr->flags & UNIT_BINK)? 1024: 1000;
+t_offset mval;
 double remfrac;
-t_addr psize = uptr->capac;
+t_offset psize = (t_offset)uptr->capac;
 const char *scale, *width;
 
 if (sim_switches & SWMASK ('B'))