Fix propagation of out-of-memory occurred in GC_make_sequence_descriptor

* typd_mlc.c (GC_make_array_descriptor): If *complex_d (set to the
result of GC_make_sequence_descriptor()) is null then return NO_MEM.

1 files changed, 2 insertions, 0 deletions

diff --git a/typd_mlc.c b/typd_mlc.c
index 52a9bd11..08c08bb1 100644
--- a/typd_mlc.c
+++ b/typd_mlc.c
@@ -277,6 +277,8 @@ STATIC int GC_make_array_descriptor(size_t nelements, size_t size,
                                 (complex_descriptor *)one_element);
               break;
           }
+          if (EXPECT(NULL == *complex_d, FALSE)) return NO_MEM;
+
           return COMPLEX;
       }
     }