From f2c4cfadb13dd5eef1979069317e5c6ee224c908 Mon Sep 17 00:00:00 2001
From: Tristan Gingold <tgingold@free.fr>
Date: Fri, 23 Nov 2018 04:28:44 +0100
Subject: Add --max-stack-alloc option, check stack allocation of complex
 object.

Fix #692
---
 src/vhdl/translate/translation.ads | 4 ++++
 1 file changed, 4 insertions(+)

(limited to 'src/vhdl/translate/translation.ads')

diff --git a/src/vhdl/translate/translation.ads b/src/vhdl/translate/translation.ads
index 4c9b2ff27..ffaabd3bf 100644
--- a/src/vhdl/translate/translation.ads
+++ b/src/vhdl/translate/translation.ads
@@ -80,6 +80,10 @@ package Translation is
    --  support nested subprograms.
    Flag_Unnest_Subprograms : Boolean := False;
 
+   --  If > 0, emit a call for large dynamic allocation on the stack.  Large
+   --  defined by the value.
+   Flag_Check_Stack_Allocation : Natural := 32 * 1024;
+
    type Foreign_Kind_Type is (Foreign_Unknown,
                               Foreign_Vhpidirect,
                               Foreign_Intrinsic);
-- 
cgit v1.2.3