--- init.c~1 2006-02-22 17:56:04.000000000 +0000 +++ init.c 2006-02-22 18:34:26.000000000 +0000 @@ -1831,6 +1831,37 @@ __gnat_handler_installed = 1; } +#elif defined (__DJGPP__) + +/***************************************/ +/* FIXME: this is only a draft version */ +/***************************************/ + +struct timestruc_t +{ + time_t tv_sec; + long tv_nsec; +}; + + +int +nanosleep (struct timestruc_t *Rqtp, struct timestruc_t *Rmtp); + +int +nanosleep (struct timestruc_t *Rqtp, struct timestruc_t *Rmtp) +{ + usleep (1000000*Rqtp->tv_sec+Rqtp->tv_nsec/1000); + if (Rmtp) { Rmtp->tv_sec = Rmtp->tv_nsec=0; } + return 0; +} + + +void +__gnat_install_handler () +{ + __gnat_handler_installed = 1; +} + #else /* For all other versions of GNAT, the handler does nothing */