* feature.h, feature.c: Use PROTO macro, instead of #if __STDC__.
authorJim Blandy <jimb@red-bean.com>
Wed, 4 Sep 1996 19:33:49 +0000 (19:33 +0000)
committerJim Blandy <jimb@red-bean.com>
Wed, 4 Sep 1996 19:33:49 +0000 (19:33 +0000)
libguile/feature.c
libguile/feature.h

index 1861088..e9b2053 100644 (file)
 
 SCM *scm_loc_features;
 
-#ifdef __STDC__
-void
-scm_add_feature(char* str)
-#else
 void
 scm_add_feature(str)
      char* str;
-#endif
 {
   *scm_loc_features = scm_cons(SCM_CAR(scm_intern(str, strlen(str))), *scm_loc_features);
 }
@@ -70,13 +65,8 @@ scm_add_feature(str)
 
 
 SCM_PROC(s_compiled_library_path, "compiled-library-path", 0, 0, 0, scm_compiled_library_path);
-#ifdef __STDC__
-SCM
-scm_compiled_library_path (void)
-#else
 SCM
 scm_compiled_library_path ()
-#endif
 {
 #ifndef LIBRARY_PATH
   return SCM_BOOL_F;
@@ -89,13 +79,8 @@ scm_compiled_library_path ()
 \f
 
 SCM_PROC(s_program_arguments, "program-arguments", 0, 0, 0, scm_program_arguments);
-#ifdef __STDC__
-SCM 
-scm_program_arguments (void)
-#else
 SCM 
 scm_program_arguments ()
-#endif
 {
   return scm_progargs;
 }
@@ -105,13 +90,8 @@ scm_program_arguments ()
 
 \f
 
-#ifdef __STDC__
-void
-scm_init_feature(void)
-#else
 void
 scm_init_feature()
-#endif
 {
   scm_loc_features = &SCM_CDR(scm_sysintern("*features*", SCM_EOL));
 #ifdef RECKLESS
index d57b18a..c7adbfa 100644 (file)
 
 #include <libguile/__scm.h>
 
-\f
 
 extern SCM *scm_loc_features;
 
-\f
-#ifdef __STDC__
-extern void scm_add_feature(char* str);
-extern SCM scm_compiled_library_path (void);
-extern SCM scm_program_arguments (void);
-extern void scm_init_feature(void);
-
-#else /* STDC */
-extern void scm_add_feature();
-extern SCM scm_compiled_library_path ();
-extern SCM scm_program_arguments ();
-extern void scm_init_feature();
-
-#endif /* STDC */
-
+extern void scm_add_feature PROTO((char* str));
+extern SCM scm_compiled_library_path  PROTO((void));
+extern SCM scm_program_arguments  PROTO((void));
+extern void scm_init_feature PROTO((void));
 
 #endif  /* FEATUREH */