From 5b8b793c35a8c9a55705352d9c32f670a416adbe Mon Sep 17 00:00:00 2001
From: Bob Dubner <rdubner@symas.com>
Date: Fri, 26 Apr 2024 13:03:06 -0400
Subject: [PATCH] Get rid of some unimportant compiler complaints about
 constants.cc

---
 libgcobol/constants.cc | 17 +++++++++++++++++
 1 file changed, 17 insertions(+)

diff --git a/libgcobol/constants.cc b/libgcobol/constants.cc
index c3bcb3007cc0..0b6252cfe404 100644
--- a/libgcobol/constants.cc
+++ b/libgcobol/constants.cc
@@ -88,6 +88,7 @@ struct cblc_field_t __gg___1_##a = {    \
   .level          = 0 ,                 \
   .digits         = 0 ,                 \
   .rdigits        = 0 ,                 \
+  .dummy          = 0 ,                 \
   };
 
 #define INTEGER_CONSTANT2(a) \
@@ -110,6 +111,7 @@ struct cblc_field_t __gg___2_##a = {    \
   .level          = 0 ,                 \
   .digits         = 0 ,                 \
   .rdigits        = 0 ,                 \
+  .dummy          = 0 ,                 \
   };
 
 unsigned char __gg__data_space[1] = {' '};
@@ -131,6 +133,7 @@ struct cblc_field_t __gg__space = {
   .level          = 0 ,
   .digits         = 0 ,
   .rdigits        = 0 ,
+  .dummy          = 0 ,
   };
 
 struct cblc_field_t __gg__spaces = {
@@ -151,6 +154,7 @@ struct cblc_field_t __gg__spaces = {
   .level          = 0 ,
   .digits         = 0 ,
   .rdigits        = 0 ,
+  .dummy          = 0 ,
   };
 
 unsigned char __gg__data_low_values[1] = {'\0'};
@@ -172,6 +176,7 @@ struct cblc_field_t __gg__low_values = {
   .level          = 0 ,
   .digits         = 0 ,
   .rdigits        = 0 ,
+  .dummy          = 0 ,
   };
 
 unsigned char __gg__data_zeros[1] = {'0'};
@@ -193,6 +198,7 @@ struct cblc_field_t __gg__zeros = {
   .level          = 0 ,
   .digits         = 0 ,
   .rdigits        = 0 ,
+  .dummy          = 0 ,
   };
 
 unsigned char __gg__data_high_values[1] = {0xFF};
@@ -214,6 +220,7 @@ struct cblc_field_t __gg__high_values = {
   .level          = 0 ,
   .digits         = 0 ,
   .rdigits        = 0 ,
+  .dummy          = 0 ,
   };
 
 unsigned char __gg__data_quotes[1] = {0xFF};
@@ -235,6 +242,7 @@ struct cblc_field_t __gg__quotes = {
   .level          = 0 ,
   .digits         = 0 ,
   .rdigits        = 0 ,
+  .dummy          = 0 ,
   };
 
 unsigned char __gg__data_nulls[8] = {0,0,0,0,0,0,0,0};
@@ -256,6 +264,7 @@ struct cblc_field_t __gg__nulls = {
   .level          = 0 ,
   .digits         = 0 ,
   .rdigits        = 0 ,
+  .dummy          = 0 ,
   };
 
 unsigned char __gg__data__file_status[2] = {0,0};
@@ -277,6 +286,7 @@ struct cblc_field_t __gg___file_status = {
   .level          = 0 ,
   .digits         = 2 ,
   .rdigits        = 0 ,
+  .dummy          = 0 ,
   };
 
 
@@ -299,6 +309,7 @@ struct cblc_field_t __gg___14_linage_counter6 = {
   .level          = 0 ,
   .digits         = 4 ,
   .rdigits        = 0 ,
+  .dummy          = 0 ,
   };
 
 
@@ -321,6 +332,7 @@ struct cblc_field_t __gg___6_upsi_04 = {
   .level          = 0 ,
   .digits         = 4 ,
   .rdigits        = 0 ,
+  .dummy          = 0 ,
   };
 
 unsigned char __gg__data_return_code[2] = {0,0};
@@ -342,6 +354,7 @@ struct cblc_field_t __gg___11_return_code6 = {
   .level          = 0 ,
   .digits         = 4 ,
   .rdigits        = 0 ,
+  .dummy          = 0 ,
   };
 
 unsigned char __gg___data_dev_stdin[] = "/dev/stdin";
@@ -363,6 +376,7 @@ struct cblc_field_t __gg___dev_stdin = {
   .level          = 0 ,
   .digits         = 0 ,
   .rdigits        = 0 ,
+  .dummy          = 0 ,
   };
 
  unsigned char __gg___data_dev_stdout[] = "/dev/stdout";
@@ -384,6 +398,7 @@ struct cblc_field_t __gg___dev_stdout = {
   .level          = 0 ,
   .digits         = 0 ,
   .rdigits        = 0 ,
+  .dummy          = 0 ,
   };
 
 unsigned char __gg___data_dev_stderr[] = "/dev/stderr";
@@ -405,6 +420,7 @@ struct cblc_field_t __gg___dev_stderr = {
   .level          = 0 ,
   .digits         = 0 ,
   .rdigits        = 0 ,
+  .dummy          = 0 ,
   };
 
 unsigned char __gg___data_dev_null[] = "/dev/null";
@@ -426,6 +442,7 @@ struct cblc_field_t __gg___dev_null = {
   .level          = 0 ,
   .digits         = 0 ,
   .rdigits        = 0 ,
+  .dummy          = 0 ,
   };
 
 #pragma GCC diagnostic pop
-- 
GitLab