From 193961d7392779b8a27060d918979a41ff1d18eb Mon Sep 17 00:00:00 2001
From: "Christian A. Weber" <chris@gna.ch>
Date: Mon, 24 May 1993 15:44:57 +0000
Subject: iffh_FormSize entfernt (wegen nesting FORMS in Push/PopChunk())

---
 Source/CloseIFF.S | 11 +++++------
 1 file changed, 5 insertions(+), 6 deletions(-)

(limited to 'Source/CloseIFF.S')

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
-- 
cgit v1.2.3