github.com/rcornwell.sims
1
0
Fork 0
mirror of https://github.com/rcornwell/sims.git synced 2026-01-20 17:57:40 +00:00
Code Releases Activity

KA10: Cleanup compile warnings

Browse Source
This commit is contained in:
Mark Pizzolato 2019-01-12 01:24:06 -08:00
parent 1c76fd2825
commit f20b82c467
8 changed files with 11 additions and 15 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
PDP10/ka10_cpu.c
View File

@ -794,7 +794,7 @@ int check_irq_level() {
* Recover from held interrupt.
*/
void restore_pi_hold() {
int i, lvl;
int lvl;
if (!pi_enable)
return;
@ -1442,7 +1442,7 @@ int its_load_tlb(uint32 reg, int page, uint32 *tlb) {
if ((page & 1) == 0)
data >>= 18;
data &= RMASK;
*tlb = data;
*tlb = (uint32)data;
pag_reload = ((pag_reload + 1) & 017);
return 0;
}
@ -1460,7 +1460,7 @@ int page_lookup(int addr, int flag, int *loc, int wr, int cur_context, int fetch
int page = (RMASK & addr) >> 10;
int acc;
int uf = (FLAGS & USER) != 0;
int ofd = fault_data;
int ofd = (int)fault_data;
/* If paging is not enabled, address is direct */
if (!page_enable) {
@ -2771,7 +2771,7 @@ dpnorm:
dbr3 = ((0377 << 18) | RMASK) & MB;
AB = (AB + 1) & RMASK;
MB = M[AB]; /* WD 7 */
ac_stack = MB;
ac_stack = (uint32)MB;
page_enable = 1;
}
/* AC & 2 = Clear TLB */
@ -3122,7 +3122,6 @@ ldb_ptr:
}
fnorm:
if (AR != 0) {
fxnorm:
if ((AR & FPNMASK) != 0) { SC += 1; AR >>= 1; }
if (((SC & 0400) != 0) ^ ((SC & 0200) != 0))
fxu_hold_set = 1;

2
PDP10/ka10_dc.c
View File

@ -315,7 +315,7 @@ int32 ln;
tmxr_poll_rx(&dc_desc);
for (ln = 0; ln < dc_desc.lines; ln++) {
/* Check if buffer empty */
if (dc_ldsc[ln].xmte && (dc_l_status & (1 << ln)) != 0) {
if (dc_ldsc[ln].xmte && ((dc_l_status & (1ll << ln)) != 0)) {
tx_enable |= 1 << ln;
}

3
PDP10/ka10_defs.h
View File

@ -213,6 +213,9 @@ extern DEBTAB crd_debug[];
#define EXJSYS 000040 /* 002000 */
#endif
#ifdef ITS
#ifdef PURE
#undef PURE
#endif
#define PURE 000040 /* 002000 */
#define ONEP 000010 /* 000400 */
#endif

2
PDP10/ka10_mt.c
View File

@ -610,7 +610,7 @@ t_stat mt_srv(UNIT * uptr)
}
uptr->BPOS++;
uptr->CPOS++;
if ((uptr->BPOS + cc_max) >= uptr->hwmark)
if ((uint32)(uptr->BPOS + cc_max) >= uptr->hwmark)
uptr->CNTRL |= MT_LASTWD;
status &= ~CHAR_COUNT;
status |= (uint64)(uptr->CPOS) << 18;

3
PDP10/ka10_mty.c
View File

@ -169,7 +169,6 @@ static t_stat mty_svc (UNIT *uptr)
{
static int scan = 0;
int i;
int32 done;
/* High speed device, poll every 0.1 ms. */
sim_activate_after (uptr, 100);
@ -221,8 +220,6 @@ static t_stat mty_svc (UNIT *uptr)
static t_stat mty_reset (DEVICE *dptr)
{
int i;
sim_debug(DEBUG_CMD, &mty_dev, "Reset\n");
if (mty_unit->flags & UNIT_ATT)
sim_activate (mty_unit, tmxr_poll);

2
PDP10/ka10_rp.c
View File

@ -539,7 +539,7 @@ t_stat rp_devio(uint32 dev, uint64 *data) {
} else if ((rp_reg[ctlr] & 040) == 0) {
int parity;
*data = (t_uint64)(rp_read(ctlr, rp_drive[ctlr], rp_reg[ctlr]) & 0177777);
parity = (*data >> 8) ^ *data;
parity = (int)((*data >> 8) ^ *data);
parity = (parity >> 4) ^ parity;
parity = (parity >> 2) ^ parity;
parity = ((parity >> 1) ^ parity) & 1;

2
PDP10/ka10_rs.c
View File

@ -382,7 +382,7 @@ t_stat rs_devio(uint32 dev, uint64 *data) {
int parity;
*data = (t_uint64)(rs_read(ctlr, rs_drive[ctlr], rs_reg[ctlr]) & 0177777);
parity = (*data >> 8) ^ *data;
parity = (int)((*data >> 8) ^ *data);
parity = (parity >> 4) ^ parity;
parity = (parity >> 2) ^ parity;
parity = ((parity >> 1) ^ parity) & 1;

3
PDP10/ka10_tk10.c
View File

@ -183,7 +183,6 @@ static t_stat tk10_svc (UNIT *uptr)
{
static int scan = 0;
int i;
int32 done;
sim_activate_after (uptr, 1000);
@ -244,8 +243,6 @@ static t_stat tk10_svc (UNIT *uptr)
static t_stat tk10_reset (DEVICE *dptr)
{
int i;
sim_debug(DEBUG_CMD, &tk10_dev, "Reset\n");
if (tk10_unit->flags & UNIT_ATT)
sim_activate (tk10_unit, tmxr_poll);