Lout 3.40.

http://jeffreykingston.id.au/lout/lout-3.40.tar.gz

1 files changed, 1 insertions, 1 deletions

diff --git a/z47.c b/z47.c
index 2ce949f..855f74e 100644
--- a/z47.c
+++ b/z47.c
@@ -48,7 +48,7 @@ static OBJECT tab[TAB_SIZE];
 
 #define hash1(pos, env, fnum)						\
 {									\
-  pos = ( (unsigned int) env + fnum ) % TAB_SIZE;			\
+  pos = ( (unsigned long) env + fnum ) % TAB_SIZE;			\
 }
 
 #define hash2(pos, fnum, offset)					\