From: Chris Hanson Date: Wed, 7 Jan 2004 04:43:34 +0000 (+0000) Subject: Eliminate some compiler warnings. X-Git-Tag: 20090517-FFI~1737 X-Git-Url: https://birchwood-abbey.net/git?a=commitdiff_plain;h=fbf810d47ad468d86beda78c4bd756293c54bbe7;p=mit-scheme.git Eliminate some compiler warnings. --- diff --git a/v7/src/microcode/dstack.h b/v7/src/microcode/dstack.h index c5ec6b3bd..fb306126f 100644 --- a/v7/src/microcode/dstack.h +++ b/v7/src/microcode/dstack.h @@ -1,6 +1,6 @@ /* -*-C-*- -$Id: dstack.h,v 1.11 2003/02/14 18:28:18 cph Exp $ +$Id: dstack.h,v 1.12 2004/01/07 04:43:29 cph Exp $ Copyright (C) 1990-1999 Massachusetts Institute of Technology @@ -26,14 +26,12 @@ USA. #ifndef __DSTACK_H__ #define __DSTACK_H__ +#include "config.h" #include "ansidecl.h" #include -#ifndef _SUNOS4 -extern void - EXFUN (abort, (void)), - EXFUN (exit, (int)), - EXFUN (free, (void *)); +#ifdef STDC_HEADERS +# include #endif extern void EXFUN (dstack_initialize, (void)); diff --git a/v7/src/microcode/obstack.h b/v7/src/microcode/obstack.h index 324951b49..5212d46d9 100644 --- a/v7/src/microcode/obstack.h +++ b/v7/src/microcode/obstack.h @@ -105,8 +105,10 @@ Summary: #define __OBSTACKS__ #include "config.h" +#include "ansidecl.h" #ifdef STDC_HEADERS +# include # include #endif @@ -146,15 +148,11 @@ struct obstack /* control current object in current chunk */ /* Declare the external functions we use; they are in obstack.c. */ -#ifndef _SUNOS4 -extern void EXFUN (abort, (void)); -#endif - #ifdef HAVE_STDC extern void _obstack_newchunk (struct obstack *, int); extern void _obstack_free (struct obstack *, void *); extern void _obstack_begin (struct obstack *, int, long, - void *(*) (), void (*) ()); + void * (*) (size_t), void (*) (void *)); #else extern void _obstack_newchunk (); extern void _obstack_free ();