* gsubr.c (scm_gsubr_apply): Added dummy return to avoid compiler

[bpt/guile.git] / libguile / smob.c

diff --git a/libguile/smob.c b/libguile/smob.c
index 4843d48..25c8669 100644 (file)
--- a/libguile/smob.c
+++ b/libguile/smob.c
@@ -12,7 +12,8 @@
  * 
  * You should have received a copy of the GNU General Public License
  * along with this software; see the file COPYING.  If not, write to
- * the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA.
+ * the Free Software Foundation, Inc., 59 Temple Place, Suite 330,
+ * Boston, MA 02111-1307 USA
  *
  * As a special exception, the Free Software Foundation gives permission
  * for additional uses of the text contained in its release of GUILE.
@@ -36,12 +37,14 @@
  *
  * If you write modifications of your own for GUILE, it is your choice
  * whether to permit this exception to apply to your modifications.
- * If you do not wish that, delete this exception notice.  
- */
+ * If you do not wish that, delete this exception notice.  */
 \f
 
 #include <stdio.h>
 #include "_scm.h"
+
+#include "smob.h"
+
 #ifdef HAVE_MALLOC_H
 #include <malloc.h>
 #endif
@@ -56,14 +59,10 @@
 scm_sizet scm_numsmob;
 scm_smobfuns *scm_smobs;
 
-#ifdef __STDC__
-long 
-scm_newsmob (scm_smobfuns *smob)
-#else
+
 long 
 scm_newsmob (smob)
      scm_smobfuns *smob;
-#endif
 {
   char *tmp;
   if (255 <= scm_numsmob)
@@ -114,13 +113,9 @@ static scm_smobfuns bigob =
 
 
 
-#ifdef __STDC__
-void
-scm_smob_prehistory (void)
-#else
+
 void
 scm_smob_prehistory ()
-#endif
 {
   scm_numsmob = 0;
   scm_smobs = (scm_smobfuns *) malloc (7 * sizeof (scm_smobfuns));