Fix C warning if -DNDEBUG

snuglas · snuglas · commit aa1916146516 · 2024-08-27T15:17:39.000Z
diff --git a/src/runtime/gencgc.c b/src/runtime/gencgc.c
@@ -4771,10 +4771,9 @@ static int verify_headered_object(lispobj* object, sword_t nwords,
     }
 #if FUN_SELF_FIXNUM_TAGGED
     if (widetag == CLOSURE_WIDETAG && object[1] != 0) {
-        struct simple_fun* sf = (void*)(object[1] - 2*N_WORD_BYTES);
+        __attribute__((unused)) struct simple_fun* sf = (void*)(object[1] - 2*N_WORD_BYTES);
         gc_assert(header_widetag(sf->header) == SIMPLE_FUN_WIDETAG);
-        struct code* code = fun_code_header(sf);
-        gc_assert(header_widetag(code->header) == CODE_HEADER_WIDETAG);
+        gc_assert(header_widetag(fun_code_header(sf)->header) == CODE_HEADER_WIDETAG);
     }
 #endif
     if (widetag == SYMBOL_WIDETAG) {

Original file line number	Diff line number	Diff line change
`@@ -4771,10 +4771,9 @@ static int verify_headered_object(lispobj* object, sword_t nwords,`
`4771`	`4771`	`}`
`4772`	`4772`	`#if FUN_SELF_FIXNUM_TAGGED`
`4773`	`4773`	`if (widetag == CLOSURE_WIDETAG && object[1] != 0) {`
`4774`		`- struct simple_fun* sf = (void)(object[1] - 2N_WORD_BYTES);`
	`4774`	`+ __attribute__((unused)) struct simple_fun* sf = (void)(object[1] - 2N_WORD_BYTES);`
`4775`	`4775`	`gc_assert(header_widetag(sf->header) == SIMPLE_FUN_WIDETAG);`
`4776`		`- struct code* code = fun_code_header(sf);`
`4777`		`- gc_assert(header_widetag(code->header) == CODE_HEADER_WIDETAG);`
	`4776`	`+ gc_assert(header_widetag(fun_code_header(sf)->header) == CODE_HEADER_WIDETAG);`
`4778`	`4777`	`}`
`4779`	`4778`	`#endif`
`4780`	`4779`	`if (widetag == SYMBOL_WIDETAG) {`