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

IBM360: Added more unit record devices to configuration.

Browse Source
This commit is contained in:
Richard Cornwell 2020-06-06 15:16:58 -04:00
parent 43400e5be1
commit 8aa1d65100
6 changed files with 26 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
IBM360/ibm360_cdp.c
View File

@ -80,7 +80,13 @@ t_stat cdp_detach(UNIT *);
UNIT cdp_unit[] = {
{UDATA(cdp_srv, UNIT_CDP, 0), 600, UNIT_ADDR(0x00D) }, /* A */
#if NUM_DEVS_CDP > 1
{UDATA(cdp_srv, UNIT_CDP, 0), 600, UNIT_ADDR(0x01D)}, /* A */
{UDATA(cdp_srv, UNIT_CDP | UNIT_DIS, 0), 600, UNIT_ADDR(0x01D)}, /* A */
#if NUM_DEVS_CDP > 2
{UDATA(cdp_srv, UNIT_CDP | UNIT_DIS, 0), 600, UNIT_ADDR(0x40D)}, /* A */
#if NUM_DEVS_CDP > 3
{UDATA(cdp_srv, UNIT_CDP | UNIT_DIS, 0), 600, UNIT_ADDR(0x41D)}, /* A */
#endif
#endif
#endif
};

8
IBM360/ibm360_cdr.c
View File

@ -85,7 +85,13 @@ t_stat cdr_detach(UNIT *);
UNIT cdr_unit[] = {
{UDATA(cdr_srv, UNIT_CDR, 0), 300, UNIT_ADDR(0x0C)}, /* A */
#if NUM_DEVS_CDR > 1
{UDATA(cdr_srv, UNIT_CDR, 0), 300, UNIT_ADDR(0x1C)}, /* B */
{UDATA(cdr_srv, UNIT_CDR | UNIT_DIS, 0), 300, UNIT_ADDR(0x1C)}, /* B */
#if NUM_DEVS_CDR > 2
{UDATA(cdr_srv, UNIT_CDR | UNIT_DIS, 0), 300, UNIT_ADDR(0x40C)}, /* B */
#if NUM_DEVS_CDR > 3
{UDATA(cdr_srv, UNIT_CDR | UNIT_DIS, 0), 300, UNIT_ADDR(0x41C)}, /* B */
#endif
#endif
#endif
};

8
IBM360/ibm360_defs.h
View File

@ -60,11 +60,11 @@
#define MAX_MUX 2
/* Define number of supported units for each device type */
#define NUM_DEVS_CDP 1
#define NUM_DEVS_CDR 1
#define NUM_DEVS_CDP 4
#define NUM_DEVS_CDR 4
#define NUM_DEVS_CON 1
#define NUM_DEVS_LPR 1
#define NUM_DEVS_MT 1
#define NUM_DEVS_LPR 4
#define NUM_DEVS_MT 2
#define NUM_UNITS_MT 8
#define NUM_DEVS_DASD 4
#define NUM_UNITS_DASD 8

8
IBM360/ibm360_lpr.c
View File

@ -90,7 +90,13 @@ t_stat lpr_getlpp(FILE *, UNIT *, int32, CONST void *);
UNIT lpr_unit[] = {
{UDATA(lpr_srv, UNIT_LPR, 55), 300, UNIT_ADDR(0x0E)}, /* A */
#if NUM_DEVS_LPR > 1
{UDATA(lpr_srv, UNIT_LPR, 55), 300, UNIT_ADDR(0x1E)}, /* B */
{UDATA(lpr_srv, UNIT_LPR | UNIT_DIS, 55), 300, UNIT_ADDR(0x1E)}, /* B */
#if NUM_DEVS_LPR > 2
{UDATA(lpr_srv, UNIT_LPR | UNIT_DIS, 55), 300, UNIT_ADDR(0x40E)}, /* B */
#if NUM_DEVS_LPR > 3
{UDATA(lpr_srv, UNIT_LPR | UNIT_DIS, 55), 300, UNIT_ADDR(0x41E)}, /* B */
#endif
#endif
#endif
};

2
IBM360/ibm360_mt.c
View File

@ -197,7 +197,7 @@ DEVICE mtb_dev = {
"MTB", mtb_unit, NULL, mt_mod,
NUM_UNITS_MT, 8, 15, 1, 8, 8,
NULL, NULL, &mt_reset, &mt_boot, &mt_attach, &mt_detach,
&mtb_dib, DEV_BUF_NUM(1) | DEV_DISABLE | DEV_DEBUG | DEV_TAPE, 0, dev_debug
&mtb_dib, DEV_BUF_NUM(1) | DEV_DISABLE | DEV_DIS | DEV_DEBUG | DEV_TAPE, 0, dev_debug
};
#endif

BIN
doc/ibm360.doc
View File

Binary file not shown.