mirror of
https://github.com/rcornwell/sims.git
synced 2026-01-21 10:12:30 +00:00
KA10: Fixed attach -a option.
This commit is contained in:
parent
edb8bbeceb
commit
02fdb12af9
@ -1182,6 +1182,7 @@ t_stat dt_attach (UNIT *uptr, CONST char *cptr)
|
||||
sim_printf ("16b format");
|
||||
else sim_printf ("18b/36b format");
|
||||
sim_printf (", buffering file in memory\n");
|
||||
(void)sim_fseek (uptr->fileref, 0, SEEK_SET); /* start at the beginning of file */
|
||||
uptr->io_flush = dt_flush;
|
||||
if (uptr->flags & UNIT_8FMT) { /* 12b? */
|
||||
for (ba = 0; ba < uptr->capac; ) { /* loop thru file */
|
||||
|
||||
@ -1194,6 +1194,7 @@ dtc_attach (UNIT *uptr, CONST char *cptr)
|
||||
sim_printf ("16b format");
|
||||
else sim_printf ("18b/36b format");
|
||||
sim_printf (", buffering file in memory\n");
|
||||
(void)sim_fseek (uptr->fileref, 0, SEEK_SET); /* start at the beginning of file */
|
||||
uptr->WRITTEN = 0;
|
||||
uptr->io_flush = dtc_flush;
|
||||
if (uptr->flags & UNIT_8FMT) { /* 12b? */
|
||||
|
||||
Loading…
x
Reference in New Issue
Block a user