Notes For V2.9-11

1. New Features 1.1 GRI-909 - This is a new simulator for the GRI-909. - It has been hand-tested; so far, no software has been discovered. 1.2 VAX - SET CPU CONHALT will cause a HALT instruction to return to the boot ROM console rather than to SIMH. SET CPU SIMHALT restores the default behavior. - BRB/W self at IPL 1F stops the simulator. This is the default behavior of VMS at exit. 1.3 PDP-18b - ATTACH -A PTR/PTP attaches the reader and punch in ASCII mode. In ASCII mode, the reader automatically sets the high order bit of incoming alphabetic data, and the punch clears the high order bit of outgoing data. 1.4 SCP - DO -V echoes commands from the file as they are executed. - Under Windows, execution priority is set BELOW_NORMAL when the simulator is running. 2. Release Notes 2.1 Bugs Fixed - PDP-11 CPU: fixed updating of MMR0 on a memory management error. - VAX FPA: changed function names to avoid conflict with C math library. - 1401 MT: read end of record generates group mark without word mark. - 1401 DP: fixed address generation and checking. - SCP: an EXIT within a DO command will cause the simulator to exit. 3. In Progress - Interdata 16b/32b: coded, not tested. - SDS 940: coded, not tested. - IBM 1620: coded, not tested. If you would like to help with the debugging of the untested simulators, they can be made available by special request.
2026-02-16 20:52:19 +00:00 · 2002-07-14 15:20:00 -07:00
parent 701f0fe028
commit df6475181c
179 changed files with 36441 additions and 4464 deletions
--- a/PDP1/pdp1_cpu.c
+++ b/PDP1/pdp1_cpu.c
@@ -1,6 +1,6 @@
 /* pdp1_cpu.c: PDP-1 CPU simulator

-   Copyright (c) 1993-2001, Robert M. Supnik
+   Copyright (c) 1993-2002, Robert M. Supnik

   Permission is hereby granted, free of charge, to any person obtaining a
   copy of this software and associated documentation files (the "Software"),
@@ -25,6 +25,7 @@

   cpu		PDP-1 central processor

+   30-Dec-01	RMS	Added old PC queue
   07-Dec-01	RMS	Revised to use breakpoint package
   30-Nov-01	RMS	Added extended SET/SHOW support
   16-Dec-00	RMS	Fixed bug in XCT address calculation
@@ -214,6 +215,9 @@

 #include "pdp1_defs.h"

+#define PCQ_SIZE	64				/* must be 2**n */
+#define PCQ_MASK	(PCQ_SIZE - 1)
+#define PCQ_ENTRY	pcq[pcq_p = (pcq_p - 1) & PCQ_MASK] = PC
 #define UNIT_V_MDV	(UNIT_V_UF)			/* mul/div */
 #define UNIT_MDV	(1 << UNIT_V_MDV)
 #define UNIT_V_MSIZE	(UNIT_V_UF+1)			/* dummy mask */
@@ -237,7 +241,9 @@ int32 extm_init = 0;					/* ext mem startup */
 int32 stop_inst = 0;					/* stop on rsrv inst */
 int32 xct_max = 16;					/* nested XCT limit */
 int32 ind_max = 16;					/* nested ind limit */
-int32 old_PC = 0;					/* old PC */
+uint16 pcq[PCQ_SIZE] = { 0 };				/* PC queue */
+int32 pcq_p = 0;					/* PC queue ptr */
+REG *pcq_r = NULL;					/* PC queue reg ptr */
 extern UNIT *sim_clock_queue;
 extern int32 sim_int_char;
 extern int32 sim_brk_types, sim_brk_dflt, sim_brk_summ;	/* breakpoint info */
@@ -313,7 +319,8 @@ REG cpu_reg[] = {
 	{ FLDATA (SBIP, sbs, SB_V_IP) },
 	{ FLDATA (IOH, ioh, 0) },
 	{ FLDATA (IOC, ioc, 0) },
-	{ ORDATA (OLDPC, old_PC, ASIZE), REG_RO },
+	{ BRDATA (PCQ, pcq, 8, ASIZE, PCQ_SIZE), REG_RO+REG_CIRC },
+	{ ORDATA (PCQP, pcq_p, 6), REG_HRO },
 	{ FLDATA (STOP_INST, stop_inst, 0) },
 	{ FLDATA (SBS_INIT, sbs_init, SB_V_ON) },
 	{ FLDATA (EXTM_INIT, extm_init, 0) },
@@ -369,7 +376,7 @@ if (sim_interval <= 0) {				/* check clock queue */

 if (sbs == (SB_ON | SB_RQ)) {				/* interrupt? */
 	sbs = SB_ON | SB_IP;				/* set in prog flag */
-	old_PC = PC;					/* save old PC */
+	PCQ_ENTRY;					/* save old PC */
 	M[0] = AC;					/* save state */
 	M[1] = EPC_WORD;
 	M[2] = IO;
@@ -392,7 +399,7 @@ sim_interval = sim_interval - 1;
 xct_instr:						/* label for XCT */
 if ((IR == 0610001) && ((MA & EPCMASK) == 0) && (sbs & SB_ON)) {
 	sbs = sbs & ~SB_IP;				/* seq debreak */
-	old_PC = PC;					/* save old PC */
+	PCQ_ENTRY;					/* save old PC */
 	OV = (M[1] >> 17) & 1;				/* restore OV */
 	extm = (M[1] >> 16) & 1;			/* restore ext mode */
 	PC = M[1] & AMASK;				/* JMP I 1 */
@@ -433,7 +440,7 @@ case 004:						/* XCT */
 	goto xct_instr;					/* go execute */
 case 007:						/* CAL, JDA */
 	MA = (PC & EPCMASK) | ((IR & IA)? (IR & DAMASK): 0100);
-	old_PC = PC;
+	PCQ_ENTRY;
 	M[MA] = AC;
 	AC = EPC_WORD;
 	PC = INCR_ADDR (MA);
@@ -509,12 +516,12 @@ case 025:						/* SAS */
 	if (AC == M[MA]) PC = INCR_ADDR (PC);
 	break;
 case 030:						/* JMP */
-	old_PC = PC;
+	PCQ_ENTRY;
 	PC = MA;
 	break;
 case 031:						/* JSP */
 	AC = EPC_WORD;
-	old_PC = PC;
+	PCQ_ENTRY;
 	PC = MA;
 	break;
 case 034:						/* LAW */
@@ -724,6 +731,7 @@ default:						/* undefined */
 	reason = STOP_RSRV;				/* halt */
 	break;  }					/* end switch opcode */
 }							/* end while */
+pcq_r -> qptr = pcq_p;					/* update pc q ptr */
 return reason;
 }

@@ -736,6 +744,9 @@ extm = extm_init;
 ioh = ioc = 0;
 OV = 0;
 PF = 0;
+pcq_r = find_reg ("PCQ", NULL, dptr);
+if (pcq_r) pcq_r -> qptr = 0;
+else return SCPE_IERR;
 sim_brk_types = sim_brk_dflt = SWMASK ('E');
 return SCPE_OK;
 }
--- a/PDP1/pdp1_defs.h
+++ b/PDP1/pdp1_defs.h
@@ -1,6 +1,6 @@
 /* pdp1_defs.h: 18b PDP simulator definitions

-   Copyright (c) 1993-2001, Robert M. Supnik
+   Copyright (c) 1993-2002, Robert M. Supnik

   Permission is hereby granted, free of charge, to any person obtaining a
   copy of this software and associated documentation files (the "Software"),
--- a/PDP1/pdp1_doc.txt
+++ b/PDP1/pdp1_doc.txt
@@ -1,14 +1,14 @@
 To:	Users
 From:	Bob Supnik
 Subj:	PDP-1 Simulator Usage
-Date:	1-Dec-01
+Date:	15-Jun-02

 			COPYRIGHT NOTICE

 The following copyright notice applies to both the SIMH source and binary:

-   Original code published in 1993-2001, written by Robert M Supnik
-   Copyright (c) 1993-2001, Robert M Supnik
+   Original code published in 1993-2002, written by Robert M Supnik
+   Copyright (c) 1993-2002, Robert M Supnik

   Permission is hereby granted, free of charge, to any person obtaining a
   copy of this software and associated documentation files (the "Software"),
@@ -114,7 +114,8 @@ control registers for the interrupt system.
 	SBIP		1	sequence break in progress
 	IOH		1	I/O halt in progress
 	IOC		1	I/O continue
-	OLDPC		16	PC prior to last transfer
+	PCQ[0:63]	16	PC prior to last jump or interrupt;
+				most recent PC change first
 	STOP_INST	1	stop on undefined instruction
 	SBS_INIT	1	initial state of sequence break enable
 	EXTM_INIT	1	initial state of extend mode
@@ -138,7 +139,7 @@ The paper tape reader implements these registers:
 	BUF		8	last data item processed
 	DONE		1	device done flag
 	RPLS		1	return restart pulse flag
-	POS		31	position in the input file
+	POS		32	position in the input file
 	TIME		24	time from I/O initiation to interrupt
 	STOP_IOE	1	stop on I/O error

@@ -167,7 +168,7 @@ The paper tape punch implements these registers:
 	BUF		8	last data item processed
 	DONE		1	device done flag
 	RPLS		1	return restart pulse flag
-	POS		31	position in the output file
+	POS		32	position in the output file
 	TIME		24	time from I/O initiation to interrupt
 	STOP_IOE	1	stop on I/O error

@@ -189,7 +190,7 @@ implements these registers:

 	BUF		8	last data item processed
 	DONE		1	device done flag
-	POS		31	number of characters input
+	POS		32	number of characters input
 	TIME		24	keyboard polling interval

 2.2.4 Terminal Output (TTO)
@@ -202,7 +203,7 @@ It implements these registers:
 	BUF		8	last data item processed
 	DONE		1	device done flag
 	RPLS		1	return restart pulse flag
-	POS		31	number of characters output
+	POS		32	number of characters output
 	TIME		24	time from I/O initiation to interrupt

 2.2.5 Type 62 Line Printer (LPT)
@@ -220,7 +221,7 @@ The line printer implements these registers:
 	SPC		1	spacing done flag
 	RPLS		1	return restart pulse flag
 	BPTR		6	print buffer pointer
-	POS		31	position in the output file
+	POS		32	position in the output file
 	TIME		24	time from I/O initiation to interrupt
 	STOP_IOE	1	stop on I/O error
 	LBUF[0:119]	8	line buffer
--- a/PDP1/pdp1_lp.c
+++ b/PDP1/pdp1_lp.c
@@ -1,6 +1,6 @@
 /* pdp1_lp.c: PDP-1 line printer simulator

-   Copyright (c) 1993-2001, Robert M. Supnik
+   Copyright (c) 1993-2002, Robert M. Supnik

   Permission is hereby granted, free of charge, to any person obtaining a
   copy of this software and associated documentation files (the "Software"),
@@ -25,6 +25,7 @@

   lpt		Type 62 line printer for the PDP-1

+   30-May-02	RMS	Widened POS to 32b
   13-Apr-01	RMS	Revised for register arrays
 */

@@ -55,7 +56,7 @@ REG lpt_reg[] = {
 	{ FLDATA (RPLS, lpt_rpls, 0) },
 	{ DRDATA (BPTR, bptr, 6) },
 	{ ORDATA (LPT_STATE, lpt_iot, 6), REG_HRO },
-	{ DRDATA (POS, lpt_unit.pos, 31), PV_LEFT },
+	{ DRDATA (POS, lpt_unit.pos, 32), PV_LEFT },
 	{ DRDATA (TIME, lpt_unit.wait, 24), PV_LEFT },
 	{ FLDATA (STOP_IOE, lpt_stopioe, 0) },
 	{ BRDATA (LBUF, lpt_buf, 8, 8, LPT_BSIZE) },
--- a/PDP1/pdp1_stddev.c
+++ b/PDP1/pdp1_stddev.c
@@ -1,6 +1,6 @@
 /* pdp1_stddev.c: PDP-1 standard devices

-   Copyright (c) 1993-2001, Robert M. Supnik
+   Copyright (c) 1993-2002, Robert M. Supnik

   Permission is hereby granted, free of charge, to any person obtaining a
   copy of this software and associated documentation files (the "Software"),
@@ -28,6 +28,7 @@
   tti		keyboard
   tto		teleprinter

+   30-May-02	RMS	Widened POS to 32b
   29-Nov-01	RMS	Added read only unit support
   07-Sep-01	RMS	Moved function prototypes
   10-Jun-01	RMS	Fixed comment
@@ -112,7 +113,7 @@ REG ptr_reg[] = {
 	{ FLDATA (DONE, iosta, IOS_V_PTR) },
 	{ FLDATA (RPLS, ptr_rpls, 0) },
 	{ ORDATA (STATE, ptr_state, 5), REG_HRO },
-	{ DRDATA (POS, ptr_unit.pos, 31), PV_LEFT },
+	{ DRDATA (POS, ptr_unit.pos, 32), PV_LEFT },
 	{ DRDATA (TIME, ptr_unit.wait, 24), PV_LEFT },
 	{ FLDATA (STOP_IOE, ptr_stopioe, 0) },
 	{ NULL }  };
@@ -137,7 +138,7 @@ REG ptp_reg[] = {
 	{ ORDATA (BUF, ptp_unit.buf, 8) },
 	{ FLDATA (DONE, iosta, IOS_V_PTP) },
 	{ FLDATA (RPLS, ptp_rpls, 0) },
-	{ DRDATA (POS, ptp_unit.pos, 31), PV_LEFT },
+	{ DRDATA (POS, ptp_unit.pos, 32), PV_LEFT },
 	{ DRDATA (TIME, ptp_unit.wait, 24), PV_LEFT },
 	{ FLDATA (STOP_IOE, ptp_stopioe, 0) },
 	{ NULL }  };
@@ -161,7 +162,7 @@ REG tti_reg[] = {
 	{ ORDATA (BUF, tti_unit.buf, 6) },
 	{ FLDATA (DONE, iosta, IOS_V_TTI) },
 	{ ORDATA (STATE, tti_state, 10), REG_HRO },
-	{ DRDATA (POS, tti_unit.pos, 31), PV_LEFT },
+	{ DRDATA (POS, tti_unit.pos, 32), PV_LEFT },
 	{ DRDATA (TIME, tti_unit.wait, 24), REG_NZ + PV_LEFT },
 	{ NULL }  };

@@ -185,7 +186,7 @@ REG tto_reg[] = {
 	{ FLDATA (DONE, iosta, IOS_V_TTO) },
 	{ FLDATA (RPLS, tto_rpls, 0) },
 	{ ORDATA (STATE, tto_state, 10), REG_HRO },
-	{ DRDATA (POS, tto_unit.pos, 31), PV_LEFT },
+	{ DRDATA (POS, tto_unit.pos, 32), PV_LEFT },
 	{ DRDATA (TIME, tto_unit.wait, 24), PV_LEFT },
 	{ NULL }  };

--- a/PDP1/pdp1_sys.c
+++ b/PDP1/pdp1_sys.c
@@ -1,6 +1,6 @@
 /* pdp1_sys.c: PDP-1 simulator interface

-   Copyright (c) 1993-2001, Robert M. Supnik
+   Copyright (c) 1993-2002, Robert M. Supnik

   Permission is hereby granted, free of charge, to any person obtaining a
   copy of this software and associated documentation files (the "Software"),