diff options
| author | Geert Bosch <bosch@adacore.com> | 2007-10-15 15:54:02 +0200 |
|---|---|---|
| committer | Arnaud Charlet <charlet@gcc.gnu.org> | 2007-10-15 15:54:02 +0200 |
| commit | aace458a3ebb6f55045922bbccd23926e2d16e71 (patch) | |
| tree | cfc09e8f4cf655b1ac7a9d7401ed327f6d481fd4 /gcc/ada/cal.c | |
| parent | 67ce0d7e96fd6802815643dbfb8505fad5318e95 (diff) | |
| download | gcc-aace458a3ebb6f55045922bbccd23926e2d16e71.zip gcc-aace458a3ebb6f55045922bbccd23926e2d16e71.tar.gz gcc-aace458a3ebb6f55045922bbccd23926e2d16e71.tar.bz2 | |
adaint.c, [...]: Initial port to arm-mentor-nucleus.
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.
From-SVN: r129319
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 0a552aa..38f68a8 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 |