mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-04-30 03:40:34 +02:00
Code Activity

Fix compilation with C23

Browse source 
* libguile/jit.c (is_unreachable): Rename from "unreachable", which is
apparently a new reserved word in C23.
This commit is contained in:
Andy Wingo 2024-06-25 09:30:21 +02:00
parent 83d6d6afd9
commit c2e7d834c2
1 changed files with 3 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

6
libguile/jit.c
View file

@ -1,4 +1,4 @@
/* Copyright 2018-2021, 2023 /* Copyright 2018-2021, 2023-2024
Free Software Foundation, Inc. Free Software Foundation, Inc.
This file is part of Guile. This file is part of Guile.
@ -370,7 +370,7 @@ set_register_state (scm_jit_state *j, uint32_t state)
} }
static uint32_t static uint32_t
unreachable (scm_jit_state *j) is_unreachable (scm_jit_state *j)
{ {
return j->register_state & UNREACHABLE; return j->register_state & UNREACHABLE;
} }
@ -382,7 +382,7 @@ has_register_state (scm_jit_state *j, uint32_t state)
} }
#define ASSERT_HAS_REGISTER_STATE(state) \ #define ASSERT_HAS_REGISTER_STATE(state) \
ASSERT (unreachable (j) || has_register_state (j, state)); ASSERT (is_unreachable (j) || has_register_state (j, state));
static void static void
record_gpr_clobber (scm_jit_state *j, jit_gpr_t r) record_gpr_clobber (scm_jit_state *j, jit_gpr_t r)