From fe4345951d8d94524e9166ab6f563c659568f46a Mon Sep 17 00:00:00 2001
From: Bob Dubner <rdubner@symas.com>
Date: Wed, 17 Apr 2024 18:56:27 -0400
Subject: [PATCH] Set FldConditionals to FALSE on parser_symbol_add() re-use
---
gcc/cobol/genapi.cc | 5 +++++
1 file changed, 5 insertions(+)
diff --git a/gcc/cobol/genapi.cc b/gcc/cobol/genapi.cc
index 3a09aa4be53c..8e4bc479d624 100644
--- a/gcc/cobol/genapi.cc
+++ b/gcc/cobol/genapi.cc
@@ -14946,6 +14946,11 @@ parser_symbol_add(struct cbl_field_t *new_var )
ENDIF
}
}
+ else
+ {
+ gg_assign(new_var->var_decl_node, boolean_false_node);
+ }
+
return;
}
--
GitLab