sysdep.c (__gnat_set_binary_mode, [...]): Arg is int, not FILE *, in dummy version of functions.

	* sysdep.c (__gnat_set_binary_mode, __gnat_set_text_mode):
	Arg is int, not FILE *, in dummy version of functions.

	* adaint.h (__gnat_set_binary_mode, __gnat_set_text_mode):
	Arg is int, not FILE *.

From-SVN: r46012

gcc/ada/ChangeLog

 2001-10-04  Geert Bosch  <bosch@gnat.com>
 
+	* sysdep.c (__gnat_set_binary_mode, __gnat_set_text_mode):
+	Arg is int, not FILE *, in dummy version of functions.
+	
+	* adaint.h (__gnat_set_binary_mode, __gnat_set_text_mode):
+	Arg is int, not FILE *.
+
+2001-10-04  Geert Bosch  <bosch@gnat.com>
+
 	* 3lsoccon.ads: Added file, missed with initial check ins.
   
 	* 4lintnam.ads: Fix header format.

gcc/ada/adaint.h

@@ -4,7 +4,7 @@
  *                                                                          *
  *                               A D A I N T                                *
  *                                                                          *
- *                            $Revision: 1.4 $
+ *                            $Revision$
  *                                                                          *
  *                              C Header File                               *
  *                                                                          *
@@ -129,8 +129,8 @@ extern void   __gnat_expect_portable_execvp	   PARAMS ((char *, char *[]));
 extern int    __gnat_pipe			   PARAMS ((int *));
 extern int    __gnat_expect_poll		   PARAMS ((int *, int, int,
 							    int *));
-extern void    __gnat_set_binary_mode		   PARAMS ((FILE *));
-extern void    __gnat_set_text_mode		   PARAMS ((FILE *));
+extern void    __gnat_set_binary_mode		   PARAMS ((int));
+extern void    __gnat_set_text_mode		   PARAMS ((int));
 extern char   *__gnat_ttyname			   PARAMS ((int));
 
 #ifdef IN_RTS

gcc/ada/sysdep.c

@@ -6,7 +6,7 @@
  *                                                                          *
  *                          C Implementation File                           *
  *                                                                          *
- *                            $Revision: 1.2 $
+ *                            $Revision$
  *                                                                          *
  *          Copyright (C) 1992-2001 Free Software Foundation, Inc.          *
  *                                                                          *
@@ -264,14 +264,14 @@ const char __gnat_text_translation_required = 0;
 /* These functions do nothing in non-DOS systems. */
 
 void
-__gnat_set_binary_mode (stream)
-     FILE *stream ATTRIBUTE_UNUSED;
+__gnat_set_binary_mode (handle)
+     int handle ATTRIBUTE_UNUSED;
 {
 }
 
 void
-__gnat_set_text_mode (stream)
-     FILE *stream ATTRIBUTE_UNUSED;
+__gnat_set_text_mode (handle)
+     int handle ATTRIBUTE_UNUSED;
 {
 }
 char *