gcl.git - GNU Common Lisp

diff --git a/gcl/o/sfaslelf.c b/gcl/o/sfaslelf.c
index 247ebdf0d..39fa455f2 100755
--- a/gcl/o/sfaslelf.c
+++ b/gcl/o/sfaslelf.c

@@ -58,7 +58,7 @@ License for more details.

#define LOAD_SYM(sym) ({ul _b=ELF_ST_BIND(sym->st_info),_t=ELF_ST_TYPE(sym->st_info); \

sym->st_value && (_b==STB_GLOBAL || _b==STB_WEAK || (_t>=STT_LOPROC && _t<=STT_HIPROC));})

-#define MASK(n) (~(~0L << (n)))

+#define MASK(n) (~(~0ULL << (n)))