github.com/rcornwell.sims
1
0
Fork 0
mirror of https://github.com/rcornwell/sims.git synced 2026-02-08 09:11:45 +00:00
Code Releases Activity

KA10: Cleanup sblk count handling.

Browse Source
This commit is contained in:
Richard Cornwell
2019-07-12 09:03:48 -04:00
parent 1f6c9246d9
commit 1d4b5d44e0
1 changed files with 4 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
PDP10/kx10_sys.c
View File

@@ -385,14 +385,16 @@ t_stat load_sblk (FILE *fileref)
and then comes the data. Last is a checksum word. */
while (get_evac (fileref, &word) == 0 && (word & SMASK)) {
check = word;
count = (int)((((word >> 18) ^ RMASK) + 1) & RMASK);
count = (word >> 18) & RMASK;
addr = word & RMASK;
while (count-- > 0) {
while (count != 0) {
if (get_evac (fileref, &word))
return SCPE_FMT;
M[addr++] = word;
check = (check << 1) + (check >> 35) + word;
check &= FMASK;
count++;
count &= RMASK;
}
if (get_evac (fileref, &word))
return SCPE_FMT;