diff options
| -rw-r--r-- | Source/CloseIFF.S | 11 | ||||
| -rw-r--r-- | Source/OpenIFF.S | 7 |
2 files changed, 8 insertions, 10 deletions
diff --git a/Source/CloseIFF.S b/Source/CloseIFF.S index d80b251..72ee379 100644 --- a/Source/CloseIFF.S +++ b/Source/CloseIFF.S @@ -1,11 +1,10 @@ ** -** $Id: CloseIFF.S,v 21.2 92/05/17 22:51:49 chris Exp $ -** $Revision: 21.2 $ +** $Id: CloseIFF.S,v 21.3 92/05/26 17:57:17 chris Exp $ +** $Revision: 21.3 $ ** ** $Filename: CloseIFF.S $ ** $Author: chris $ -** $Release: 19.1 $ -** $Date: 92/05/17 22:51:49 $ +** $Date: 92/05/26 17:57:17 $ ** ** iff.library/IFFL_CloseIFF ** @@ -77,7 +76,7 @@ CloseIFFFunc: movem.l d2-d3/a2/a5-a6,-(SP) *** Pad-Word schreiben falls FORM-Länge nicht LONG-aligned ist - IFD hmmmmmmm + IFD ISPADWORDREALLYREQUIRED moveq.l #3,d0 ; LONG-Bitmaske and.l ifffh_FormSize(a2),d0 ; Bits gesetzt ? beq.b .NoPad ; noe ---> @@ -102,7 +101,7 @@ CloseIFFFunc: movem.l d2-d3/a2/a5-a6,-(SP) *** FORM-Länge updaten move.l ifffh_File(a2),d1 - lea ifffh_FormSize(a2),a0 + lea ifffh_ChunkSize(a2),a0 move.l a0,d2 moveq.l #4,d3 JSRLIB Write diff --git a/Source/OpenIFF.S b/Source/OpenIFF.S index 73ac1d8..8cc1bed 100644 --- a/Source/OpenIFF.S +++ b/Source/OpenIFF.S @@ -1,11 +1,10 @@ ** -** $Id: OpenIFF.S,v 22.2 92/06/03 23:20:58 chris Exp $ -** $Revision: 22.2 $ +** $Id: OpenIFF.S,v 22.3 92/06/03 23:44:19 chris Exp $ +** $Revision: 22.3 $ ** ** $Filename: OpenIFF.S $ ** $Author: chris $ -** $Release: 19.1 $ -** $Date: 92/06/03 23:20:58 $ +** $Date: 92/06/03 23:44:19 $ ** ** iff.library/IFFL_OpenIFF ** |