Merge branch 'mr/fix-another-latent-bug' into 'master'

Fix another latent bug discovered by GNAT-LLVM See merge request eng/toolchain/gnatcoll-core!126
AdaCore · Jul 22, 2024 · d14070d · d14070d
2 parents 46d59c1 + 9af7245
commit d14070d
Showing 1 changed file with 2 additions and 1 deletion.
diff --git a/core/src/gnatcoll-strings_impl.ads b/core/src/gnatcoll-strings_impl.ads
@@ -1062,7 +1062,8 @@ package GNATCOLL.Strings_Impl is
 
       Null_XString : constant XString :=
          (Ada.Finalization.Controlled with
-          Data => (Is_Big => False, Small => <>));
+          Data => (Is_Big => False,
+                   Small => (Is_Big => False, Size => 0, others => <>)));
 
    end Strings;