mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-06-21 03:00:19 +02:00
Code Activity

Fix optdebug warnings

Browse source
This commit is contained in:
Andy Wingo 2023-10-18 15:13:27 +02:00
parent 9ce8ee2921
commit 8aa2036331
2 changed files with 7 additions and 7 deletions
Download patch file Download diff file Expand all files Collapse all files

12
benchmarks/mt-gcbench.c
View file

@ -205,14 +205,14 @@ static Node* make_tree(struct thread *t, int depth) {
static void validate_tree(Node *tree, int depth) {
#ifndef NDEBUG
ASSERT_EQ(tree->i, 0);
ASSERT_EQ(tree->j, depth);
GC_ASSERT_EQ(tree->i, 0);
GC_ASSERT_EQ(tree->j, depth);
if (depth == 0) {
ASSERT(!tree->left);
ASSERT(!tree->right);
GC_ASSERT(!tree->left);
GC_ASSERT(!tree->right);
} else {
ASSERT(tree->left);
ASSERT(tree->right);
GC_ASSERT(tree->left);
GC_ASSERT(tree->right);
validate_tree(tree->left, depth - 1);
validate_tree(tree->right, depth - 1);
}