1 files changed, 28 insertions, 0 deletions
diff --git a/cpukit/posix/src/adasupp.c b/cpukit/posix/src/adasupp.c
new file mode 100644
index 0000000000..234b0c2a40
--- /dev/null
+++ b/cpukit/posix/src/adasupp.c
@@ -0,0 +1,28 @@
+/*
+ *  $Id$
+ */
+ 
+#include <assert.h>
+#include <errno.h>
+#include <pthread.h>
+
+#include <rtems/system.h>
+#include <rtems/posix/pthread.h>
+
+/*PAGE
+ *
+ *  _ada_pthread_minimum_stack_size
+ *
+ *  This routine returns the minimum stack size so the GNAT RTS can
+ *  allocate enough stack for Ada tasks.
+ */
+
+size_t _ada_pthread_minimum_stack_size( void ) 
+{
+  /*
+   *  Eventually this may need to include a per cpu family calculation
+   *  but for now, this will do.
+   */ 
+
+  return PTHREAD_MINIMUM_STACK_SIZE * 2;
+}