From 62bf651fe57c28c271ec8b5e9790e5bff78dfc53 Mon Sep 17 00:00:00 2001
From: Joel Sherrill <joel.sherrill@OARcorp.com>
Date: Thu, 29 Aug 1996 16:39:01 +0000
Subject: new file to support GNU Ada.

currently the only routine in this file simply returns the minimum stack
size for each thread.
---
 cpukit/posix/src/adasupp.c | 28 ++++++++++++++++++++++++++++
 1 file changed, 28 insertions(+)
 create mode 100644 cpukit/posix/src/adasupp.c

(limited to 'cpukit/posix')

diff --git a/cpukit/posix/src/adasupp.c b/cpukit/posix/src/adasupp.c
new file mode 100644
index 0000000000..740bf30132
--- /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/score/stack.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 STACK_MINIMUM_SIZE;
+}
-- 
cgit v1.2.3