[uim-commit] r3026 - branches/r5rs/sigscheme/src

yamaken at freedesktop.org yamaken at freedesktop.org
Sun Jan 29 15:24:06 PST 2006


Author: yamaken
Date: 2006-01-29 15:24:01 -0800 (Sun, 29 Jan 2006)
New Revision: 3026

Modified:
   branches/r5rs/sigscheme/src/number.c
   branches/r5rs/sigscheme/src/sigscheme.h
Log:
* sigscheme/src/sigscheme.h
  - (scm_p_less_eq, scm_p_less_equal): Rename scm_p_less_eq to
    scm_p_less_equal
  - (scm_p_greater_eq, scm_p_greater_equal): Rename scm_p_greater_eq
    to scm_p_greater_equal
* sigscheme/src/number.c
  - (scm_p_less_eq, scm_p_less_equal): Rename scm_p_less_eq to
    scm_p_less_equal
  - (scm_p_greater_eq, scm_p_greater_equal): Rename scm_p_greater_eq
    to scm_p_greater_equal


Modified: branches/r5rs/sigscheme/src/number.c
===================================================================
--- branches/r5rs/sigscheme/src/number.c	2006-01-29 23:20:33 UTC (rev 3025)
+++ branches/r5rs/sigscheme/src/number.c	2006-01-29 23:24:01 UTC (rev 3026)
@@ -230,7 +230,7 @@
 }
 
 ScmObj
-scm_p_less_eq(ScmObj left, ScmObj right, enum ScmReductionState *state)
+scm_p_less_equal(ScmObj left, ScmObj right, enum ScmReductionState *state)
 {
     DECLARE_FUNCTION("<=", reduction_operator);
 
@@ -246,7 +246,7 @@
 }
 
 ScmObj
-scm_p_greater_eq(ScmObj left, ScmObj right, enum ScmReductionState *state)
+scm_p_greater_equal(ScmObj left, ScmObj right, enum ScmReductionState *state)
 {
     DECLARE_FUNCTION(">=", reduction_operator);
 

Modified: branches/r5rs/sigscheme/src/sigscheme.h
===================================================================
--- branches/r5rs/sigscheme/src/sigscheme.h	2006-01-29 23:20:33 UTC (rev 3025)
+++ branches/r5rs/sigscheme/src/sigscheme.h	2006-01-29 23:24:01 UTC (rev 3026)
@@ -1216,10 +1216,11 @@
 ScmObj scm_p_divide(ScmObj left, ScmObj right, enum ScmReductionState *state);
 ScmObj scm_p_equal(ScmObj left, ScmObj right, enum ScmReductionState *state);
 ScmObj scm_p_less(ScmObj left, ScmObj right, enum ScmReductionState *state);
-ScmObj scm_p_less_eq(ScmObj left, ScmObj right, enum ScmReductionState *state);
+ScmObj scm_p_less_equal(ScmObj left, ScmObj right,
+                        enum ScmReductionState *state);
 ScmObj scm_p_greater(ScmObj left, ScmObj right, enum ScmReductionState *state);
-ScmObj scm_p_greater_eq(ScmObj left, ScmObj right,
-                        enum ScmReductionState *state);
+ScmObj scm_p_greater_equal(ScmObj left, ScmObj right,
+                           enum ScmReductionState *state);
 ScmObj scm_p_numberp(ScmObj obj);
 ScmObj scm_p_integerp(ScmObj obj);
 ScmObj scm_p_zerop(ScmObj n);



More information about the uim-commit mailing list