From b0df4321ea7db2dbe0194cec032926c5cf31c11d Mon Sep 17 00:00:00 2001 From: Laurent Guerby Date: Sat, 17 Nov 2001 11:35:08 +0000 Subject: Make-lang.in (GNATLIBFLAGS): Add -W -Wall. 2001-11-17 Laurent Guerby * Make-lang.in (GNATLIBFLAGS): Add -W -Wall. * gigi.h (init_decl_processing): Rename to gnat_init_decl_processing. * io-aux.c: Provide K&R prototypes to all functions, reformat code. * lang-spec.h: Add missing struct field to silence warnings. * sysdep.c (rts_get_*): Provide K&R prototype. * sysdep.c (Unlock_Task, Lock_Task): Move to K&R prototype. * traceback.c (Unlock_Task, Lock_Task): Likewise. * tracebak.c (__gnat_backtrace): Remove unused variable. * utils.c (end_subprog_body): Move to K&R style. From-SVN: r47117 --- gcc/ada/tracebak.c | 7 +++---- 1 file changed, 3 insertions(+), 4 deletions(-) (limited to 'gcc/ada/tracebak.c') diff --git a/gcc/ada/tracebak.c b/gcc/ada/tracebak.c index 890d0e8..287e8d4 100644 --- a/gcc/ada/tracebak.c +++ b/gcc/ada/tracebak.c @@ -6,7 +6,7 @@ * * * C Implementation File * * * - * $Revision$ + * $Revision: 1.2 $ * * * Copyright (C) 2000-2001 Ada Core Technologies, Inc. * * * @@ -61,10 +61,10 @@ #endif #define Lock_Task system__soft_links__lock_task -extern void (*Lock_Task) (void); +extern void (*Lock_Task) PARAMS ((void)); #define Unlock_Task system__soft_links__unlock_task -extern void (*Unlock_Task) (void); +extern void (*Unlock_Task) PARAMS ((void)); #ifndef CURRENT_STACK_FRAME # define CURRENT_STACK_FRAME ({ char __csf; &__csf; }) @@ -202,7 +202,6 @@ __gnat_backtrace (array, size, exclude_min, exclude_max) struct layout *current; void *top_frame; void *top_stack; - void *ret; int cnt = 0; #ifdef PROTECT_SEGV -- cgit v1.1