From b1a10bbf922d9d95c3e289237a11015cb54ba805 Mon Sep 17 00:00:00 2001 From: Matt Birkholz Date: Sat, 2 Feb 2013 18:39:15 -0700 Subject: [PATCH] microcode: Quiet some unused-but-set-variable warnings. --- src/microcode/syntax.c | 4 ++-- src/microcode/uxtrap.h | 4 ++-- 2 files changed, 4 insertions(+), 4 deletions(-) diff --git a/src/microcode/syntax.c b/src/microcode/syntax.c index e41c06d01..39ae7aa50 100644 --- a/src/microcode/syntax.c +++ b/src/microcode/syntax.c @@ -244,13 +244,12 @@ DEFINE_PRIMITIVE ("CHAR->SYNTAX-CODE", Prim_char_to_syntax_code, 2, 2, 0) #define SCAN_LIST_INITIALIZATION(initialization) \ long depth, min_depth; \ - bool sexp_flag, ignore_comments, math_exit; \ + bool sexp_flag, math_exit; \ int c; \ initialization (7); \ depth = (arg_integer (5)); \ min_depth = ((depth >= 0) ? 0 : depth); \ sexp_flag = (BOOLEAN_ARG (6)); \ - ignore_comments = (BOOLEAN_ARG (7)); \ math_exit = false /* Parse Scanning */ @@ -586,6 +585,7 @@ DEFINE_PRIMITIVE ("SCAN-LIST-FORWARD", Prim_scan_list_forward, 7, 7, 0) DEFINE_PRIMITIVE ("SCAN-LIST-BACKWARD", Prim_scan_list_backward, 7, 7, 0) { bool quoted; + bool ignore_comments = (BOOLEAN_ARG (7)); SCAN_LIST_INITIALIZATION (NORMAL_INITIALIZATION_BACKWARD); while (true) diff --git a/src/microcode/uxtrap.h b/src/microcode/uxtrap.h index ea3f74d20..fee47931e 100644 --- a/src/microcode/uxtrap.h +++ b/src/microcode/uxtrap.h @@ -608,7 +608,7 @@ typedef struct minus 1 long. */ # define DECLARE_SIGCONTEXT(scp, arg) \ - SIGCONTEXT_T * scp; \ + SIGCONTEXT_T * scp ATTRIBUTE((unused)); \ scp = ((SIGCONTEXT_T *) (((unsigned long *) (& (arg))) - 1)) # endif /* __IA32__ */ @@ -760,7 +760,7 @@ typedef struct #ifndef DECLARE_SIGCONTEXT # define DECLARE_SIGCONTEXT(scp, arg) \ - SIGCONTEXT_T * scp; \ + SIGCONTEXT_T * scp ATTRIBUTE ((unused)); \ scp = ((SIGCONTEXT_T *) (arg)) #endif -- 2.25.1