From db27544606497dbd7a87ad03857c17536cf38883 Mon Sep 17 00:00:00 2001 From: Joel Sherrill Date: Wed, 12 Dec 2007 00:15:54 +0000 Subject: 2007-12-11 Joel Sherrill * Makefile.am, configure.ac, posix/Makefile.am, wrapup/Makefile.am: Move Ada support code that is untestable from the Standard RTEMS Test Suite into its own directory. All code in score, posix, rtems, and sapi should be testable by the Standard RTEMS Test Suites. It was buried under POSIX before so this should be a clearer location anyway. * libgnat/.cvsignore, libgnat/Makefile.am, libgnat/ada_intrsupp.c, libgnat/adasupp.c: New files. * posix/src/ada_intrsupp.c, posix/src/adasupp.c: Removed. --- cpukit/libgnat/adasupp.c | 31 +++++++++++++++++++++++++++++++ 1 file changed, 31 insertions(+) create mode 100644 cpukit/libgnat/adasupp.c (limited to 'cpukit/libgnat/adasupp.c') diff --git a/cpukit/libgnat/adasupp.c b/cpukit/libgnat/adasupp.c new file mode 100644 index 0000000000..c74fe3b34b --- /dev/null +++ b/cpukit/libgnat/adasupp.c @@ -0,0 +1,31 @@ +/* + * $Id$ + */ + +#if HAVE_CONFIG_H +#include "config.h" +#endif + +#include +#include + +#include +#include + +/*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; +} -- cgit v1.2.3