2004-05-17 Steve Kargl <kargls@comcast.net>

[pf3gnuchains/gcc-fork.git] / gcc / ada / adaint.h

diff --git a/gcc/ada/adaint.h b/gcc/ada/adaint.h
index 5ce5d68..c45a533 100644 (file)
--- a/gcc/ada/adaint.h
+++ b/gcc/ada/adaint.h
@@ -6,7 +6,7 @@
  *                                                                          *
  *                              C Header File                               *
  *                                                                          *
- *          Copyright (C) 1992-2003 Free Software Foundation, Inc.          *
+ *          Copyright (C) 1992-2004 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- *
@@ -63,24 +63,30 @@ extern int    __gnat_stat                      (char *,
 extern int    __gnat_open_read                     (char *, int);
 extern int    __gnat_open_rw                       (char *, int);
 extern int    __gnat_open_create                   (char *, int);
+extern int    __gnat_create_output_file            (char *);
 extern int    __gnat_open_append                   (char *, int);
 extern long   __gnat_file_length                   (int);
+extern long   __gnat_named_file_length             (char *);
 extern void   __gnat_tmp_name                     (char *);
 extern char  *__gnat_readdir                       (DIR *, char *);
 extern int    __gnat_readdir_is_thread_safe        (void);
-extern time_t __gnat_file_time_name                (char *);
-extern time_t __gnat_file_time_fd                  (int);
+
+extern OS_Time __gnat_file_time_name                (char *);
+extern OS_Time __gnat_file_time_fd                  (int);
+/* return -1 in case of error */
+
 extern void   __gnat_set_file_time_name                   (char *, time_t);
 extern void   __gnat_get_env_value_ptr             (char *, int *,
                                                    char **);
 extern int    __gnat_file_exists                  (char *);
 extern int    __gnat_is_regular_file               (char *);
-extern int    __gnat_is_absolute_path              (char *);
+extern int    __gnat_is_absolute_path              (char *,int);
 extern int    __gnat_is_directory                 (char *);
 extern int    __gnat_is_writable_file             (char *);
 extern int    __gnat_is_readable_file             (char *name);
 extern void   __gnat_set_readonly                  (char *name);
 extern void   __gnat_set_writable                  (char *name);
+extern void   __gnat_set_executable                (char *name);
 extern int    __gnat_is_symbolic_link             (char *name);
 extern int    __gnat_portable_spawn                (char *[]);
 extern int    __gnat_portable_no_block_spawn       (char *[]);
@@ -140,6 +146,7 @@ extern int    __gnat_expect_poll               (int *, int, int, int *);
 extern void   __gnat_set_binary_mode              (int);
 extern void   __gnat_set_text_mode                (int);
 extern char  *__gnat_ttyname                      (int);
+extern int    __gnat_lseek                        (int, long, int);
 
 #ifdef __MINGW32__
 extern void   __gnat_plist_init                    (void);