From 7c14cecd9030fc7d09ea69788012d32fe2852d72 Mon Sep 17 00:00:00 2001
From: "Christian A. Weber" <chris@gna.ch>
Date: Tue, 26 May 1992 17:57:17 +0000
Subject: IFF-FORMs werden nicht mehr LONG-aligned

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

(limited to 'Source/CloseIFF.S')

diff --git a/Source/CloseIFF.S b/Source/CloseIFF.S
index 963fb53..d80b251 100644
--- a/Source/CloseIFF.S
+++ b/Source/CloseIFF.S
@@ -1,11 +1,11 @@
 **
-**	$Id: CloseIFF.S,v 21.1 92/05/15 03:23:45 chris Exp $
-**	$Revision: 21.1 $
+**	$Id: CloseIFF.S,v 21.2 92/05/17 22:51:49 chris Exp $
+**	$Revision: 21.2 $
 **
 **	$Filename: CloseIFF.S $
 **	$Author: chris $
 **	$Release: 19.1 $
-**	$Date: 92/05/15 03:23:45 $
+**	$Date: 92/05/17 22:51:49 $
 **
 **	iff.library/IFFL_CloseIFF
 **
@@ -77,6 +77,7 @@ CloseIFFFunc:	movem.l	d2-d3/a2/a5-a6,-(SP)
 
 	*** Pad-Word schreiben falls FORM-Länge nicht LONG-aligned ist
 
+	IFD hmmmmmmm
 		moveq.l	#3,d0			; LONG-Bitmaske
 		and.l	ifffh_FormSize(a2),d0	; Bits gesetzt ?
 		beq.b	.NoPad			; noe --->
@@ -87,6 +88,7 @@ CloseIFFFunc:	movem.l	d2-d3/a2/a5-a6,-(SP)
 		addq.l	#4,SP
 		add.l	d3,ifffh_FormSize(a2)
 .NoPad:
+	ENDC
 
 	*** An Offset 4 (FORM-Längen-Eintrag) des Files seeken
 
-- 
cgit v1.2.3