Silence some variable set but not used warnings.

[sxemacs] / modules / cl / cl-loop.c

diff --git a/modules/cl/cl-loop.c b/modules/cl/cl-loop.c
index 41b71a1..40d3148 100644 (file)
--- a/modules/cl/cl-loop.c
+++ b/modules/cl/cl-loop.c
@@ -1588,6 +1588,7 @@ The Common Lisp loop macro.
 
        /* now parse the stuff */
        parse_result = cl_loop_yyparse(&args, lsen, &context, &token);
+       (void)parse_result;
 
        UNGCPRO;
        return loop_sentence;