summaryrefslogtreecommitdiff
path: root/Source/CloseIFF.S
diff options
context:
space:
mode:
Diffstat (limited to 'Source/CloseIFF.S')
-rw-r--r--Source/CloseIFF.S11
1 files changed, 5 insertions, 6 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