From 67cda9e22fc01b03a6c53d294ee8814a834745dc Mon Sep 17 00:00:00 2001
From: cjhjacobs <devnull@localhost>
Date: Wed, 18 May 2011 19:19:19 +0200
Subject: [PATCH] Fixed bug reported on tack-devel mailing list on 20-3-2011

---
 util/ass/ass80.c | 8 +++++++-
 1 file changed, 7 insertions(+), 1 deletion(-)

diff --git a/util/ass/ass80.c b/util/ass/ass80.c
index 66e5a31e..614dbaf4 100644
--- a/util/ass/ass80.c
+++ b/util/ass/ass80.c
@@ -189,7 +189,13 @@ cons_t xgetarb(l,f) int l; FILE *f ; {
 
 	shift=0 ; val=0 ;
 	while ( l-- ) {
-		val += ((cons_t)(c = ctrunc(xgetc(f))))<<shift ;
+		// val += ((cons_t)(c = ctrunc(xgetc(f))))<<shift ;
+		// Bug here: shifts with too large shift counts
+		// get unspecified results. --Ceriel
+		c = ctrunc(xgetc(f));
+		if (shift < 8 * sizeof(cons_t)) {
+			val += ((cons_t)c)<<shift ;
+		}
 		shift += 8 ;
 	}
 	if (c == 0377 && shift > 8 && ((shift>>3)&1)) {