diff options
author | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2007-10-15 13:54:02 +0000 |
---|---|---|
committer | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2007-10-15 13:54:02 +0000 |
commit | 5091bc2f9c53037f5234f613da07b8318d70c32b (patch) | |
tree | cfc09e8f4cf655b1ac7a9d7401ed327f6d481fd4 /gcc/ada/cal.c | |
parent | 96da32848363deea28bde71dc3d42c34e7067f7a (diff) | |
download | gcc-5091bc2f9c53037f5234f613da07b8318d70c32b.tar.gz |
2007-10-15 Geert Bosch <bosch@adacore.com>
* adaint.c, socket.c, cal.c: Initial port to arm-mentor-nucleus.
* expect.c: Initial port to arm-mentor-nucleus.
Use kill for __gnat_kill() on VMS.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@129319 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/ada/cal.c')
-rw-r--r-- | gcc/ada/cal.c | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/gcc/ada/cal.c b/gcc/ada/cal.c index 0a552aa17ac..38f68a88942 100644 --- a/gcc/ada/cal.c +++ b/gcc/ada/cal.c @@ -6,7 +6,7 @@ * * * C Implementation File * * * - * Copyright (C) 1992-2006, Free Software Foundation, Inc. * + * Copyright (C) 1992-2007, Free Software Foundation, Inc. * * * * GNAT is free software; you can redistribute it and/or modify it under * * terms of the GNU General Public License as published by the Free Soft- * @@ -36,7 +36,7 @@ /* struct timeval fields type are not normalized (they are generally */ /* defined as int or long values). */ -#if defined(VMS) +#if defined(VMS) || defined(__nucleus__) /* this is temporary code to avoid build failure under VMS */ @@ -62,6 +62,8 @@ __gnat_duration_to_timeval (long sec, long usec, void *t) #else #include <sys/times.h> #endif +#elif defined (__nucleus__) +#include <time.h> #else #include <sys/time.h> #endif |