[gcc r17-4174] cobol: Small change to support non-bootstrap build with gcc 8.5.

[James K. Lowden via Gcc-cvs]

https://gcc.gnu.org/g:eb9821697c80e4229da5b9eeb2c6d3a9948df8a7

commit r17-4174-geb9821697c80e4229da5b9eeb2c6d3a9948df8a7
Author: James K. Lowden <jklow...@cobolworx.com>
Date:   Fri Sep 11 12:40:03 2026 -0400

    cobol: Small change to support non-bootstrap build with gcc 8.5.
    
    Brace-initalized construction for a list of elements years ago
    required each element be constructed.
    
    gcc/cobol/ChangeLog:
    
            * parse.y: Add wordop_t to each element.

Diff:
---
 gcc/cobol/parse.y | 7 ++++---
 1 file changed, 4 insertions(+), 3 deletions(-)

diff --git a/gcc/cobol/parse.y b/gcc/cobol/parse.y
index e064ef99dc2f..6434c2685fb2 100644
--- a/gcc/cobol/parse.y
+++ b/gcc/cobol/parse.y
@@ -15083,16 +15083,17 @@ dialect_words_set( cbl_dialect_t dialect ) {
   typedef bool (current_tokens_t::*wordop_func_t)(const cbl_loc_t& loc,
                           const cbl_name_t keyword,
                           const cbl_name_t alias);
+
   struct wordop_t {
     cbl_dialect_t dialect;
     wordop_func_t op;
     cbl_name_t keyword, alias;
-    bool match(cbl_dialect_t dialect) const { return this->dialect & dialect; }
     
+    bool match(cbl_dialect_t dialect) const { return this->dialect & dialect; }
   };
   const static std::vector<wordop_t> wordops {
-    { dialect_mf_gnu, &current_tokens_t::equate, "BINARY-DOUBLE", 
"BINARY-C-LONG" },
-    { dialect_gnu_e,  &current_tokens_t::substitute, "CONCAT", "CONCATENATE" },
+    wordop_t{ dialect_mf_gnu, &current_tokens_t::equate, "BINARY-DOUBLE", 
"BINARY-C-LONG" },
+    wordop_t{ dialect_gnu_e,  &current_tokens_t::substitute, "CONCAT", 
"CONCATENATE" },
   };
 
   if( dialect != (done & dialect) ) { // if any part of dialect not done