[uim-commit] r1062 - branches/r5rs/uim

[tkng at freedesktop.org]

Author: tkng
Date: 2005-07-29 05:01:47 -0700 (Fri, 29 Jul 2005)
New Revision: 1062

Modified:
   branches/r5rs/uim/uim-scm.c
Log:
* uim/uim-scm.c:
 -(uim_scm_eval_c_string): Fixed a typo.
 -(uim_scm_cons): Fixed a typo.
 -(uim_scm_return_value): Removed content. This function itself should be removed.


Modified: branches/r5rs/uim/uim-scm.c
===================================================================
--- branches/r5rs/uim/uim-scm.c	2005-07-29 11:57:37 UTC (rev 1061)
+++ branches/r5rs/uim/uim-scm.c	2005-07-29 12:01:47 UTC (rev 1062)
@@ -306,13 +306,13 @@
 uim_lisp
 uim_scm_eval_c_string(const char *str)
 {
-  return Scm_eval_c_string(exp);
+  return Scm_eval_c_string(str);
 }
 
 uim_lisp
 uim_scm_return_value(void)
 {
-  return (uim_lisp)siod_return_value();
+  /* FIXME: This function should be removed. */
 }
 
 uim_lisp
@@ -354,7 +354,7 @@
 uim_lisp
 uim_scm_cons(uim_lisp car, uim_lisp cdr)
 {
-  return SigScm_NewCons(car, cdr);
+  return Scm_NewCons(car, cdr);
 }
 
 uim_lisp