소스 검색

* write header for crc_only

peter 22 년 전
부모
커밋
895e03b854
1개의 변경된 파일6개의 추가작업 그리고 1개의 파일을 삭제
  1. 6 1
      compiler/ppu.pas

+ 6 - 1
compiler/ppu.pas

@@ -711,6 +711,8 @@ procedure tppufile.writeheader;
 var
   opos : integer;
 begin
+  if crc_only then
+   exit;
   { flush buffer }
   writebuf;
   { update size (w/o header!) in the header }
@@ -984,7 +986,10 @@ end;
 end.
 {
   $Log$
-  Revision 1.34  2003-04-25 20:59:34  peter
+  Revision 1.35  2003-05-23 17:03:51  peter
+    * write header for crc_only
+
+  Revision 1.34  2003/04/25 20:59:34  peter
     * removed funcretn,funcretsym, function result is now in varsym
       and aliases for result and function name are added using absolutesym
     * vs_hidden parameter for funcret passed in parameter