folkert/simh-testsetgenerator
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

I650, IBM1130, PDP11, PDP18b, VAX, Sigma: Fix set but unused variables.

Browse source
This commit is contained in:
Lars Brinkhoff 2020-12-02 14:45:21 -08:00 • committed by Mark Pizzolato
parent 1f76c0ce8a
commit d5befa75c1
10 changed files with 13 additions and 23 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
I650/i650_dsk.c
View file

@ -453,8 +453,6 @@ t_stat dsk_reset(DEVICE * dptr)
t_stat dsk_attach(UNIT * uptr, CONST char *file)
{
DEVICE *dptr = find_dev_from_unit(uptr);
int unit = (uptr - dptr->units);
t_stat r;
int flen;

2
Ibm1130/ibm1130_t2741.c
View file

@ -9,8 +9,10 @@
#define DEBUG_T2741
#if 0
static TMLN t2741_ldsc = { 0 }; /* line descr for telnet attachment */
static TMXR t2741_tmxr = { 1, 0, 0, &t2741_ldsc }; /* line mux for telnet attachment */
#endif
#define T2741_DSW_TRANSMIT_NOT_READY 0x4000
#define T2741_DSW_READ_RESPONSE 0x1000

5
PDP11/pdp11_rq.c
View file

@ -3015,7 +3015,10 @@ if (cp->ctype == DEFAULT_CTYPE)
cp->ctype = (UNIBUS? UDA50_CTYPE : RQDX3_CTYPE);
if (!plugs_inited ) {
uint32 d, u = 0;
#if !defined (VM_VAX)
uint32 u = 0;
#endif
uint32 d;
char uname[16];
plugs_inited = TRUE;

10
PDP18B/pdp18b_dt.c
View file

@ -221,6 +221,12 @@
else CLR_INT (DTA);
#else /* Type 550 */
static const int32 map_unit[16] = { /* Type 550 unit map */
-1, 1, 2, 3, 4, 5, 6, 7,
0, -1, -1, -1, -1, -1, -1, -1
};
#define DTA_V_UNIT 12 /* unit select */
#define DTA_M_UNIT 017
#define DTA_UNIT (DTA_M_UNIT << DTA_V_UNIT)
@ -344,10 +350,6 @@ int32 dt_dctime = 40000; /* decel time */
int32 dt_substate = 0;
int32 dt_logblk = 0;
int32 dt_stopoffr = 0; /* stop on off reel */
static const int32 map_unit[16] = { /* Type 550 unit map */
-1, 1, 2, 3, 4, 5, 6, 7,
0, -1, -1, -1, -1, -1, -1, -1
};
int32 dt75 (int32 dev, int32 pulse, int32 dat);
int32 dt76 (int32 dev, int32 pulse, int32 dat);

2
VAX/vax820_ka.c
View file

@ -151,7 +151,6 @@ DEVICE ka_dev[] = {
t_stat ka_rdreg (int32 *val, int32 pa, int32 lnt)
{
int32 ka, ofs;
t_bool extmem = MEMSIZE > MAXMEMSIZE;
ka = NEXUS_GETNEX (pa) - TR_KA0; /* get CPU num */
ofs = NEXUS_GETOFS (pa); /* get offset */
@ -194,7 +193,6 @@ return SCPE_OK;
t_stat ka_wrreg (int32 val, int32 pa, int32 lnt)
{
int32 ka, ofs;
t_bool extmem = MEMSIZE > MAXMEMSIZE;
ka = NEXUS_GETNEX (pa) - TR_KA0; /* get CPU num */
ofs = NEXUS_GETOFS (pa); /* get offset */

2
VAX/vax820_mem.c
View file

@ -113,7 +113,6 @@ DEVICE mctl_dev[] = {
t_stat mctl_rdreg (int32 *val, int32 pa, int32 lnt)
{
int32 mctl, ofs;
t_bool extmem = MEMSIZE > MAXMEMSIZE;
mctl = NEXUS_GETNEX (pa) - TR_MCTL0; /* get mctl num */
ofs = NEXUS_GETOFS (pa); /* get offset */
@ -158,7 +157,6 @@ return SCPE_OK;
t_stat mctl_wrreg (int32 val, int32 pa, int32 lnt)
{
int32 mctl, ofs;
t_bool extmem = MEMSIZE > MAXMEMSIZE;
mctl = NEXUS_GETNEX (pa) - TR_MCTL0; /* get mctl num */
ofs = NEXUS_GETOFS (pa); /* get offset */

2
VAX/vax820_stddev.c
View file

@ -1212,8 +1212,6 @@ return FALSE;
t_stat fl_reset (DEVICE *dptr)
{
extern int32 sys_model;
fl_ecode = 0; /* clear error */
fl_sector = 0; /* clear addr */
fl_track = 0;

2
VAX/vax_va.c
View file

@ -481,7 +481,6 @@ return data;
void va_dga_wr (int32 pa, int32 val, int32 lnt)
{
int32 rg = (pa >> 1) & 0xFF;
uint32 addr = VA_FFO_OF;
if (rg <= DGA_MAXREG)
sim_debug (DBG_DGA, &va_dev, "dga_wr: %s, %X from PC %08X\n", va_dga_rgd[rg], val, fault_PC);
@ -552,7 +551,6 @@ int32 va_mem_rd (int32 pa)
{
int32 rg = (pa >> 1) & 0x7FFF;
int32 data;
UNIT *uptr = &va_dev.units[0];
uint16 *qr = (uint16*) vax_vcb02_bin;
if (rg >= VA_RSV_OF) {

3
sigma/sigma_dp.c
View file

@ -930,7 +930,6 @@ t_bool dp_end_sec (UNIT *uptr, uint32 lnt, uint32 exp, uint32 st)
{
uint32 cidx = uptr->UCTX;
uint32 dva = dp_dib[cidx].dva;
uint32 dtype = GET_DTYPE (uptr->flags);
DP_CTX *ctx = &dp_ctx[cidx];
if (st != CHS_ZBC) { /* end record? */
@ -978,7 +977,6 @@ return DVS_AUTO;
uint32 dp_tdv_status (uint32 cidx, uint32 un)
{
uint32 st;
DP_CTX *ctx = &dp_ctx[cidx];
UNIT *dp_unit = dp_dev[cidx].units;
t_bool on_cyl;
@ -996,7 +994,6 @@ return st;
uint32 dp_aio_status (uint32 cidx, uint32 un)
{
uint32 st;
DP_CTX *ctx = &dp_ctx[cidx];
UNIT *dp_unit = dp_dev[cidx].units;
t_bool on_cyl;

4
sigma/sigma_mt.c
View file

@ -470,8 +470,6 @@ return SCPE_OK;
t_stat mt_map_err (UNIT *uptr, t_stat st)
{
int32 u = uptr - mt_dev.units;
switch (st) {
case MTSE_FMT: /* illegal fmt */
@ -639,8 +637,6 @@ return r;
t_stat mt_detach (UNIT* uptr)
{
uint32 un = uptr - mt_dev.units;
if (!(uptr->flags & UNIT_ATTABLE))
return SCPE_NOATT;
uptr->UST = 0;