[uim-commit] r1692 - branches/r5rs/sigscheme

[yamaken at freedesktop.org]

Author: yamaken
Date: 2005-09-30 05:25:04 -0700 (Fri, 30 Sep 2005)
New Revision: 1692

Modified:
   branches/r5rs/sigscheme/operations-siod.c
Log:
* sigscheme/operations-siod.c
  - (ScmOp_symbol_value, ScmOp_set_symbol_value): Modify error message


Modified: branches/r5rs/sigscheme/operations-siod.c
===================================================================
--- branches/r5rs/sigscheme/operations-siod.c	2005-09-30 12:24:12 UTC (rev 1691)
+++ branches/r5rs/sigscheme/operations-siod.c	2005-09-30 12:25:04 UTC (rev 1692)
@@ -109,7 +109,7 @@
 ScmObj ScmOp_symbol_value(ScmObj var)
 {
     if (!SYMBOLP(var))
-        SigScm_ErrorObj("symbol-value : require symbol but got ", var);
+        SigScm_ErrorObj("symbol-value : symbol required but got ", var);
 
     return symbol_value(var, SCM_NULL);
 }
@@ -125,7 +125,7 @@
 {
     /* sanity check */
     if (!SYMBOLP(var))
-        SigScm_ErrorObj("set-symbol-value! : require symbol but got ", var);
+        SigScm_ErrorObj("set-symbol-value! : symbol required but got ", var);
 
     return SCM_SYMBOL_SET_VCELL(var, val);
 }