[uim commit] r4598 - sigscheme-trunk/src

[codesite-noreply]

Author: yamakenz
Date: Thu Jun 14 18:08:43 2007
New Revision: 4598

Modified:
   sigscheme-trunk/src/module-srfi1.c

Log:
* src/module-srfi1.c
  - (scm_initialize_srfi1): Add alias srfi-1:map


Modified: sigscheme-trunk/src/module-srfi1.c
==============================================================================
--- sigscheme-trunk/src/module-srfi1.c  (original)
+++ sigscheme-trunk/src/module-srfi1.c  Thu Jun 14 18:08:43 2007
@@ -74,7 +74,9 @@
     scm_define_alias("srfi-1:member", "member");
     scm_define_alias("srfi-1:assoc",  "assoc");
 
-    /* SigScheme's map is in-order and faster than srfi-1.scm */
+    /* SigScheme's map is faster than srfi-1.scm, in-order and accepts unequal
+     * length arguments */
+    scm_define_alias("srfi-1:map",   "map");
     scm_define_alias("map-in-order", "r5rs:map");
     scm_define_alias("map",          "r5rs:map");