This is the mail archive of the
gcc-patches@gcc.gnu.org
mailing list for the GCC project.
Re: [Ada] bacth of minor warning and style fixes
null_function style is already correct in CVS, here is a patch for the
remaining, tested by compiling the functions in a separate file (I
don't have a win32 build yet). Ok to commit?
--
Laurent Guerby <guerby@acm.org>
2001-11-25 Laurent Guerby <guerby@acm.org>
* sysdep.c (rts_get_*): Fix style.
Index: sysdep.c
===================================================================
RCS file: /cvs/gcc/gcc/gcc/ada/sysdep.c,v
retrieving revision 1.4
diff -c -3 -p -r1.4 sysdep.c
*** sysdep.c 2001/11/17 11:35:08 1.4
--- sysdep.c 2001/11/25 12:29:26
*************** char *rts_get_hPrevInstance PARAMS ((voi
*** 526,535 ****
char *rts_get_lpCommandLine PARAMS ((void));
int rts_get_nShowCmd PARAMS ((void));
! char *rts_get_hInstance () { return (GetModuleHandleA (0)); }
! char *rts_get_hPrevInstance () { return (0); }
! char *rts_get_lpCommandLine () { return (GetCommandLineA ()); }
! int rts_get_nShowCmd () { return (1); }
#endif /* WINNT */
#ifdef VMS
--- 526,554 ----
char *rts_get_lpCommandLine PARAMS ((void));
int rts_get_nShowCmd PARAMS ((void));
! char *
! rts_get_hInstance ()
! {
! return GetModuleHandleA (0);
! }
!
! char *
! rts_get_hPrevInstance ()
! {
! return 0;
! }
!
! char *
! rts_get_lpCommandLine ()
! {
! return GetCommandLineA ();
! }
!
! int
! rts_get_nShowCmd ()
! {
! return 1;
! }
#endif /* WINNT */
#ifdef VMS