From 00a1cd7e881af617a577d9d6fad8c949d0f8402e Mon Sep 17 00:00:00 2001
From: Yashas <yashas_2010@yahoo.com>
Date: Fri, 29 Sep 2017 16:21:33 +0530
Subject: [PATCH] trigger an error if an array of unknown size is returned

---
 source/compiler/sc3.c | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/source/compiler/sc3.c b/source/compiler/sc3.c
index d419061..8fe657b 100644
--- a/source/compiler/sc3.c
+++ b/source/compiler/sc3.c
@@ -1984,7 +1984,9 @@ static int nesting=0;
      * reserved memory block as a hidden parameter
      */
     retsize=(int)array_totalsize(symret);
-    assert(retsize>0);
+    if (retsize<=0) {
+      error(92,sym->name);
+    } /* if */
     modheap(retsize*sizeof(cell));/* address is in ALT */
     pushreg(sALT);                /* pass ALT as the last (hidden) parameter */
     decl_heap+=retsize;