$NetBSD: patch-aq,v 1.1 2002/01/09 23:04:58 seb Exp $

--- src/heap-sc.c.orig	Thu Apr  4 14:55:43 1996
+++ src/heap-sc.c
@@ -37,11 +37,11 @@
 	(void)P_Collect ();
 	p = Hp;
     }
-    ALIGN(p);
+    ELK_ALIGN(p);
     if (p + size > Heap_End) {
 	(void)P_Collect ();
 	p = Hp;
-	ALIGN(p);
+	ELK_ALIGN(p);
 	if (p + size > Heap_End - HEAP_MARGIN)
 	    Uncatchable_Error ("Out of heap space");
     }
@@ -108,7 +108,7 @@
 	SETPOINTER(*p, POINTER(*tag));
 	return;
     }
-    ALIGN(To);
+    ELK_ALIGN(To);
     switch (t) {
     case T_Bignum:
 	size = sizeof (struct S_Bignum) - sizeof (gran_t)
