clisp/clisp-2.49-gctoken.dif

diff --git a/utils/gctrigger.c b/utils/gctrigger.c
--- a/utils/gctrigger.c
+++ b/utils/gctrigger.c
@@ -606,6 +606,7 @@ static inline void VectorToken_delete (V
 static Token nexttoken (boolean within_prep_directive)
 {
   Token token;
+  memset(&token, 0, sizeof(Token));
  restart:
   { int c = next_char();
     switch (c) {