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

Replace getw/putw with sim_read/sim_write

Browse source 
For endian-neutral behavior use sim_read/sim_write instead of getwand
putw.
This commit is contained in:
Howard M. Harte 2012-11-20 16:33:26 -08:00
parent 2f72d3efb0
commit 8bdc206fea
1 changed files with 7 additions and 5 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

12
TX-0/tx0_cpu.c
View file

@ -1217,7 +1217,7 @@ cpu_get_switches(void)
t_stat sim_load(FILE *fileref, char *cptr, char *fnam, int32 flag) {
uint32 cnt = 0, word;
t_addr j, lo, hi;
t_addr j, lo, hi, sz, sz_words;
char *result;
if (flag) { /* Dump to file. */
@ -1225,13 +1225,15 @@ t_stat sim_load(FILE *fileref, char *cptr, char *fnam, int32 flag) {
if (result == NULL) return SCPE_ARG;
for (j = lo; j <= hi; j++) {
if (putw(j, fileref)== EOF) return SCPE_IOERR;
if (putw(M[j], fileref) == EOF) return SCPE_IOERR;
if (sim_fwrite(&j, 4, 1, fileref) == 0) return SCPE_IOERR;
if (sim_fwrite(&M[j], 4, 1, fileref) == 0) return SCPE_IOERR;
}
} else {
lo = strtotv(cptr, &result, 8) & 0xFFFF;
for (j = lo; !feof(fileref); j++) {
if ((word = getw(fileref)) == EOF) break;
sz = sim_fsize(fileref);
sz_words = sz / 4;
for (j = lo; j < sz_words; j++) {
sim_fread(&word, 4, 1, fileref);
M[j] = word;
}
}