summaryrefslogtreecommitdiff
path: root/gcc/ada/5vparame.ads
diff options
context:
space:
mode:
Diffstat (limited to 'gcc/ada/5vparame.ads')
-rw-r--r--gcc/ada/5vparame.ads6
1 files changed, 5 insertions, 1 deletions
diff --git a/gcc/ada/5vparame.ads b/gcc/ada/5vparame.ads
index d9d6e10b09f..360596d4dbc 100644
--- a/gcc/ada/5vparame.ads
+++ b/gcc/ada/5vparame.ads
@@ -6,7 +6,6 @@
-- --
-- S p e c --
-- --
--- --
-- Copyright (C) 1992-2002 Free Software Foundation, Inc. --
-- --
-- GNAT is free software; you can redistribute it and/or modify it under --
@@ -95,6 +94,11 @@ pragma Pure (Parameters);
-- when Size < Minimum_Stack_Size, return Minimum_Stack_Size
-- otherwise return given Size
+ Default_Env_Stack_Size : constant Size_Type := 8_192_000;
+ -- Assumed size of the environment task, if no other information
+ -- is available. This value is used when stack checking is
+ -- enabled and no GNAT_STACK_LIMIT environment variable is set.
+
Stack_Grows_Down : constant Boolean := True;
-- This constant indicates whether the stack grows up (False) or
-- down (True) in memory as functions are called. It is used for