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

PDP11, VAX: Provide a useful error message when the unimplemented DUMP command is attempted.

Browse source
This commit is contained in:
Mark Pizzolato 2016-01-25 16:21:54 -08:00
parent c8c071e3e1
commit a9cc1f1c68
8 changed files with 10 additions and 8 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
PDP11/pdp11_sys.c
View file

@ -243,8 +243,10 @@ t_stat sim_load (FILE *fileref, char *cptr, char *fnam, int flag)
int32 c[6], d, i, cnt, csum; int32 c[6], d, i, cnt, csum;
uint32 org; uint32 org;
if ((*cptr != 0) || (flag != 0)) if (*cptr != 0)
return SCPE_ARG; return SCPE_ARG;
if (flag != 0)
return sim_messagef (SCPE_NOFNC, "Command Not Implemented\n");
do { /* block loop */ do { /* block loop */
csum = 0; /* init checksum */ csum = 0; /* init checksum */
for (i = 0; i < 6; ) { /* 6 char header */ for (i = 0; i < 6; ) { /* 6 char header */

2
VAX/vax610_syslist.c
View file

@ -109,7 +109,7 @@ int32 i;
uint32 origin, limit; uint32 origin, limit;
if (flag) /* dump? */ if (flag) /* dump? */
return SCPE_ARG; return sim_messagef (SCPE_NOFNC, "Command Not Implemented\n");
origin = 0; /* memory */ origin = 0; /* memory */
limit = (uint32) cpu_unit.capac; limit = (uint32) cpu_unit.capac;
if (sim_switches & SWMASK ('O')) { /* origin? */ if (sim_switches & SWMASK ('O')) { /* origin? */

2
VAX/vax630_syslist.c
View file

@ -125,7 +125,7 @@ int32 i;
uint32 origin, limit, step = 1; uint32 origin, limit, step = 1;
if (flag) /* dump? */ if (flag) /* dump? */
return SCPE_ARG; return sim_messagef (SCPE_NOFNC, "Command Not Implemented\n");
if (sim_switches & SWMASK ('R')) { /* ROM? */ if (sim_switches & SWMASK ('R')) { /* ROM? */
origin = ROMBASE; origin = ROMBASE;
limit = ROMBASE + ROMSIZE; limit = ROMBASE + ROMSIZE;

2
VAX/vax730_syslist.c
View file

@ -108,7 +108,7 @@ int32 val;
uint32 origin, limit; uint32 origin, limit;
if (flag) /* dump? */ if (flag) /* dump? */
return SCPE_ARG; return sim_messagef (SCPE_NOFNC, "Command Not Implemented\n");
origin = 0; /* memory */ origin = 0; /* memory */
limit = (uint32) cpu_unit.capac; limit = (uint32) cpu_unit.capac;
if (sim_switches & SWMASK ('O')) { /* origin? */ if (sim_switches & SWMASK ('O')) { /* origin? */

2
VAX/vax750_syslist.c
View file

@ -112,7 +112,7 @@ int32 val;
uint32 origin, limit; uint32 origin, limit;
if (flag) /* dump? */ if (flag) /* dump? */
return SCPE_ARG; return sim_messagef (SCPE_NOFNC, "Command Not Implemented\n");
origin = 0; /* memory */ origin = 0; /* memory */
limit = (uint32) cpu_unit.capac; limit = (uint32) cpu_unit.capac;
if (sim_switches & SWMASK ('R')) { /* ROM? */ if (sim_switches & SWMASK ('R')) { /* ROM? */

2
VAX/vax780_syslist.c
View file

@ -122,7 +122,7 @@ int32 val;
uint32 origin, limit; uint32 origin, limit;
if (flag) /* dump? */ if (flag) /* dump? */
return SCPE_ARG; return sim_messagef (SCPE_NOFNC, "Command Not Implemented\n");
origin = 0; /* memory */ origin = 0; /* memory */
limit = (uint32) cpu_unit.capac; limit = (uint32) cpu_unit.capac;
if (sim_switches & SWMASK ('O')) { /* origin? */ if (sim_switches & SWMASK ('O')) { /* origin? */

2
VAX/vax860_syslist.c
View file

@ -118,7 +118,7 @@ int32 val;
uint32 origin, limit; uint32 origin, limit;
if (flag) /* dump? */ if (flag) /* dump? */
return SCPE_ARG; return sim_messagef (SCPE_NOFNC, "Command Not Implemented\n");
origin = 0; /* memory */ origin = 0; /* memory */
limit = (uint32) cpu_unit.capac; limit = (uint32) cpu_unit.capac;
if (sim_switches & SWMASK ('O')) { /* origin? */ if (sim_switches & SWMASK ('O')) { /* origin? */

2
VAX/vax_syslist.c
View file

@ -120,7 +120,7 @@ extern int32 ssc_cnf;
#define SSCCNF_BLO 0x80000000 #define SSCCNF_BLO 0x80000000
if (flag) /* dump? */ if (flag) /* dump? */
return SCPE_ARG; return sim_messagef (SCPE_NOFNC, "Command Not Implemented\n");
if (sim_switches & SWMASK ('R')) { /* ROM? */ if (sim_switches & SWMASK ('R')) { /* ROM? */
origin = ROMBASE; origin = ROMBASE;
limit = ROMBASE + ROMSIZE; limit = ROMBASE + ROMSIZE;