[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