From 67e94ed685327485c3be20ed1fa63eb05658f5b0 Mon Sep 17 00:00:00 2001
From: Kirk McKusick <mckusic@ucbvax.Berkeley.EDU>
Date: Thu, 23 Jul 1981 20:52:32 -0800
Subject: [PATCH] align temporaries

SCCS-vsn: usr.bin/pascal/src/tmps.c 1.6
---
 usr/src/usr.bin/pascal/src/tmps.c | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/usr/src/usr.bin/pascal/src/tmps.c b/usr/src/usr.bin/pascal/src/tmps.c
index d259bfbb46..49979b8329 100644
--- a/usr/src/usr.bin/pascal/src/tmps.c
+++ b/usr/src/usr.bin/pascal/src/tmps.c
@@ -1,6 +1,6 @@
 /* Copyright (c) 1979 Regents of the University of California */
 
-static char sccsid[] = "@(#)tmps.c 1.5 %G%";
+static char sccsid[] = "@(#)tmps.c 1.6 %G%";
 
 #include "whoami.h"
 #include "0.h"
@@ -59,7 +59,8 @@ tmpalloc(size, type, mode)
 		    return nlp;
 	    }
 #	endif PC
-	offset = op->curtmps.om_off -= leven( size );
+        offset = op->curtmps.om_off =
+	    roundup((int)(op->curtmps.om_off - size), (long)align(type));
 	if ( offset < op->om_max ) {
 	        op->om_max = offset;
 	}
-- 
2.20.1