mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-06-13 23:20:32 +02:00
Code Activity

Retire inclusion guard macro SCM_MAGIC_SNARFER.

Browse source
This commit is contained in:
Thien-Thi Nguyen 2002-03-14 05:32:48 +00:00
parent ef7c24b348
commit 19570609ad
3 changed files with 74 additions and 80 deletions
Download patch file Download diff file Expand all files Collapse all files

2
srfi/srfi-13.c
View file

@ -3037,9 +3037,7 @@ scm_init_srfi_13 (void)
scm_c_init_srfi_14 (); scm_c_init_srfi_14 ();
/* Install the string primitives. */ /* Install the string primitives. */
#ifndef SCM_MAGIC_SNARFER
#include "srfi/srfi-13.x" #include "srfi/srfi-13.x"
#endif
} }
/* End of srfi-13.c. */ /* End of srfi-13.c. */

2
srfi/srfi-14.c
View file

@ -1447,9 +1447,7 @@ scm_init_srfi_14 (void)
scm_c_init_srfi_14 (); scm_c_init_srfi_14 ();
/* Install the charset primitives. */ /* Install the charset primitives. */
#ifndef SCM_MAGIC_SNARFER
#include "srfi/srfi-14.x" #include "srfi/srfi-14.x"
#endif
} }
/* End of srfi-14.c. */ /* End of srfi-14.c. */

2
srfi/srfi-4.c
View file

@ -2147,9 +2147,7 @@ scm_init_srfi_4 (void)
scm_tc16_uvec = scm_make_smob_type ("uvec", 0); scm_tc16_uvec = scm_make_smob_type ("uvec", 0);
scm_set_smob_free (scm_tc16_uvec, uvec_free); scm_set_smob_free (scm_tc16_uvec, uvec_free);
scm_set_smob_print (scm_tc16_uvec, uvec_print); scm_set_smob_print (scm_tc16_uvec, uvec_print);
#ifndef SCM_MAGIC_SNARFER
#include "srfi/srfi-4.x" #include "srfi/srfi-4.x"
#endif
} }
/* End of srfi-4.c. */ /* End of srfi-4.c. */