Shut set but unused warnings.

[sxemacs] / src / bytecode.c

diff --git a/src/bytecode.c b/src/bytecode.c
index 8157c82..8eb8186 100644 (file)
--- a/src/bytecode.c
+++ b/src/bytecode.c
@@ -1049,6 +1049,8 @@ execute_optimized_program(const Opbyte *program,
                        Lisp_Object args;
 
                        orig_fun = fun = XCAR(op);
+                       SXE_SET_UNUSED(orig_fun);
+
                        args = XCDR(op);
                        if (SYMBOLP (fun) && !EQ(fun, Qunbound) &&
                            (fun = XSYMBOL(fun)->function, SYMBOLP(fun)))