1
0
mirror of https://github.com/simh/simh.git synced 2026-01-13 07:19:43 +00:00

NOVA, PDP18B, PDP8, PDP11: Some of the remaining changes from simh v3.12-5

This commit is contained in:
Mark Pizzolato 2025-08-07 16:13:09 -10:00
parent ecc4df6e6d
commit fe8f7e4e46
8 changed files with 15 additions and 12 deletions

View File

@ -1,6 +1,6 @@
/* nova_mta.c: NOVA magnetic tape simulator /* nova_mta.c: NOVA magnetic tape simulator
Copyright (c) 1993-2022, Robert M. Supnik Copyright (c) 1993-2023, Robert M. Supnik
Permission is hereby granted, free of charge, to any person obtaining a Permission is hereby granted, free of charge, to any person obtaining a
copy of this software and associated documentation files (the "Software"), copy of this software and associated documentation files (the "Software"),
@ -25,6 +25,7 @@
mta magnetic tape mta magnetic tape
02-Nov-23 RMS Mode change should test STA_BOT, not sim_tape_BOT
26-Mar-22 RMS Added extra case points for new MTSE definitions 26-Mar-22 RMS Added extra case points for new MTSE definitions
13-Mar-17 RMS Annotated fall through in switch 13-Mar-17 RMS Annotated fall through in switch
04-Jul-07 BKR fixed boot code to properly boot self-boot tapes; 04-Jul-07 BKR fixed boot code to properly boot self-boot tapes;
@ -371,7 +372,7 @@ else switch (c) { /* case on command */
break; break;
case CU_DMODE: /* drive mode */ case CU_DMODE: /* drive mode */
if (!sim_tape_bot (uptr)) /* must be BOT */ if ((uptr->USTAT & STA_BOT) == 0) /* must be BOT */
mta_sta = mta_sta | STA_ILL; mta_sta = mta_sta | STA_ILL;
else mta_upddsta (uptr, (mta_cu & CU_PE)? /* update drv status */ else mta_upddsta (uptr, (mta_cu & CU_PE)? /* update drv status */
uptr->USTAT | STA_PEM: uptr->USTAT & ~ STA_PEM); uptr->USTAT | STA_PEM: uptr->USTAT & ~ STA_PEM);

View File

@ -695,8 +695,8 @@ return SCPE_NXM; /* unimplemented */
t_stat CPU70_wr (int32 data, int32 pa, int32 access) t_stat CPU70_wr (int32 data, int32 pa, int32 access)
{ {
switch ((pa >> 1) & 017) { /* decode pa<4:1> */ switch ((pa >> 1) & 017) { /* decode pa<4:1> */
case 000: case 000: /* low error */
case 001: case 001: /* high error */
return SCPE_OK; /* error addr */ return SCPE_OK; /* error addr */
case 002: /* MEMERR */ case 002: /* MEMERR */

View File

@ -1,6 +1,6 @@
/* pdp11_dz.c: DZ11 terminal multiplexor simulator /* pdp11_dz.c: DZ11 terminal multiplexor simulator
Copyright (c) 2001-2008, Robert M Supnik Copyright (c) 2001-2023, Robert M Supnik
Permission is hereby granted, free of charge, to any person obtaining a Permission is hereby granted, free of charge, to any person obtaining a
copy of this software and associated documentation files (the "Software"), copy of this software and associated documentation files (the "Software"),
@ -25,6 +25,7 @@
dz DZ11 terminal multiplexor dz DZ11 terminal multiplexor
23-Feb-23 RMS Fixed line number calculation in connect (Walter Mueller)
29-Dec-08 RMS Added MTAB_NC to SET LOG command (Walter Mueller) 29-Dec-08 RMS Added MTAB_NC to SET LOG command (Walter Mueller)
19-Nov-08 RMS Revised for common TMXR show routines 19-Nov-08 RMS Revised for common TMXR show routines
18-Jun-07 RMS Added UNIT_IDLE flag 18-Jun-07 RMS Added UNIT_IDLE flag

View File

@ -379,7 +379,7 @@ return SCPE_OK;
t_stat fp15_opnd (int32 ir, int32 addr, UFP *fpn) t_stat fp15_opnd (int32 ir, int32 addr, UFP *fpn)
{ {
int32 i, numwd, wd[3]; int32 i, numwd, wd[3] = { 0,0,0 };
fguard = 0; /* clear guard */ fguard = 0; /* clear guard */
if (ir & FI_NOLOAD) /* no load? */ if (ir & FI_NOLOAD) /* no load? */
@ -426,7 +426,7 @@ return FP_OK;
t_stat fp15_store (int32 ir, int32 addr, UFP *a) t_stat fp15_store (int32 ir, int32 addr, UFP *a)
{ {
int32 i, numwd, wd[3]; int32 i, numwd, wd[3] = { 0,0,0 };
t_stat sta; t_stat sta;
fguard = 0; /* clear guard */ fguard = 0; /* clear guard */

View File

@ -1,6 +1,6 @@
/* pdp8_mt.c: PDP-8 magnetic tape simulator /* pdp8_mt.c: PDP-8 magnetic tape simulator
Copyright (c) 1993-2022, Robert M Supnik Copyright (c) 1993-2023, Robert M Supnik
Permission is hereby granted, free of charge, to any person obtaining a Permission is hereby granted, free of charge, to any person obtaining a
copy of this software and associated documentation files (the "Software"), copy of this software and associated documentation files (the "Software"),
@ -25,6 +25,7 @@
mt TM8E/TU10 magtape mt TM8E/TU10 magtape
01-Nov-23 RMS Fixed illegal op test to use BOT flag
26-Mar-22 RMS Added extra case points for new MTSE definitions 26-Mar-22 RMS Added extra case points for new MTSE definitions
16-Feb-06 RMS Added tape capacity checking 16-Feb-06 RMS Added tape capacity checking
16-Aug-05 RMS Fixed C++ declaration and cast problems 16-Aug-05 RMS Fixed C++ declaration and cast problems
@ -270,7 +271,7 @@ switch (IR & 07) { /* decode IR<9:11> */
if (((uptr->flags & UNIT_ATT) == 0) || if (((uptr->flags & UNIT_ATT) == 0) ||
sim_is_active (uptr) || sim_is_active (uptr) ||
(((f == FN_WRITE) || (f == FN_WREOF)) && sim_tape_wrp (uptr)) (((f == FN_WRITE) || (f == FN_WREOF)) && sim_tape_wrp (uptr))
|| (((f == FN_SPACER) || (f == FN_REWIND)) && sim_tape_bot (uptr))) { || (((f == FN_SPACER) || (f == FN_REWIND)) && (uptr->USTAT & STA_BOT))) {
mt_sta = mt_sta | STA_ILL | STA_ERR; /* illegal op error */ mt_sta = mt_sta | STA_ILL | STA_ERR; /* illegal op error */
mt_set_done (); /* set done */ mt_set_done (); /* set done */
mt_updcsta (uptr); /* update status */ mt_updcsta (uptr); /* update status */

View File

@ -1,6 +1,6 @@
/* pdp8_sys.c: PDP-8 simulator interface /* pdp8_sys.c: PDP-8 simulator interface
Copyright (c) 1993-2021, Robert M Supnik Copyright (c) 1993-2023, Robert M Supnik
Permission is hereby granted, free of charge, to any person obtaining a Permission is hereby granted, free of charge, to any person obtaining a
copy of this software and associated documentation files (the "Software"), copy of this software and associated documentation files (the "Software"),