/[guile]/guile/guile-core/libguile/ramap.c
ViewVC logotype

Diff of /guile/guile-core/libguile/ramap.c

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.79 by ossau, Fri Nov 16 15:04:17 2001 UTC revision 1.80 by ttn, Thu Mar 14 03:47:42 2002 UTC
# Line 2060  scm_init_ramap () Line 2060  scm_init_ramap ()
2060    init_raprocs (ra_asubrs);    init_raprocs (ra_asubrs);
2061    scm_c_define_subr (s_array_equal_p, scm_tc7_rpsubr, scm_array_equal_p);    scm_c_define_subr (s_array_equal_p, scm_tc7_rpsubr, scm_array_equal_p);
2062    scm_smobs[SCM_TC2SMOBNUM (scm_tc16_array)].equalp = scm_raequal;    scm_smobs[SCM_TC2SMOBNUM (scm_tc16_array)].equalp = scm_raequal;
 #ifndef SCM_MAGIC_SNARFER  
2063  #include "libguile/ramap.x"  #include "libguile/ramap.x"
 #endif  
2064    scm_add_feature (s_scm_array_for_each);    scm_add_feature (s_scm_array_for_each);
2065  }  }
2066    

Legend:
Removed from v.1.79  
changed lines
  Added in v.1.80

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26