From 6a8dd0ee9bd3ec2ffe6ff7fa821af92968008e55 Mon Sep 17 00:00:00 2001
From: Tristan Gingold <tgingold@free.fr>
Date: Sun, 9 Mar 2014 07:05:34 +0100
Subject: Automatically unnest subprograms for llvm.

---
 ortho/debug/ortho_debug.private.ads | 3 +++
 1 file changed, 3 insertions(+)

(limited to 'ortho/debug')

diff --git a/ortho/debug/ortho_debug.private.ads b/ortho/debug/ortho_debug.private.ads
index 98424efdf..69ee16cf7 100644
--- a/ortho/debug/ortho_debug.private.ads
+++ b/ortho/debug/ortho_debug.private.ads
@@ -26,6 +26,9 @@ package Ortho_Debug is
    procedure Finish;
 
 private
+   --  This back-end supports nested subprograms.
+   Has_Nested_Subprograms : constant Boolean := True;
+
    --  A node for a type.
    type O_Tnode_Type (<>);
    type O_Tnode is access O_Tnode_Type;
-- 
cgit v1.2.3