diff a09.c @ 52:51b437557f42

boot without disk image dir -e on other directory
author Shinji KONO <kono@ie.u-ryukyu.ac.jp>
date Sun, 22 Jul 2018 15:52:39 +0900
parents ec9f494497e1
children
line wrap: on
line diff
--- a/a09.c	Sun Jul 22 05:48:04 2018 +0900
+++ b/a09.c	Sun Jul 22 15:52:39 2018 +0900
@@ -1182,12 +1182,16 @@
  reset_crc();
  putword(0x87cd);
  putword(scanexpr(0)-loccounter);  // module size
+ if(unknown&&pass==2)error|=4;
  skipComma();
  putword(scanexpr(0)-loccounter);  // offset to module name
+ if(unknown&&pass==2)error|=4;
  skipComma();
  putbyte(scanexpr(0));             // type / language
+ if(unknown&&pass==2)error|=4;
  skipComma();
  putbyte(scanexpr(0));             // attribute
+ if(unknown&&pass==2)error|=4;
  int parity=0;
  for(int i=0; i< 8; i++) parity^=codebuf[i];
  putbyte(parity^0xff);              // header parity
@@ -1195,6 +1199,7 @@
  while (*srcptr==',') {             // there are some more
    srcptr++;
    putword(scanexpr(0));   
+   if(unknown&&pass==2)error|=4;
    skipspace();
  }
  prevloc = codeptr;