[uim commit] r5337 - trunk/uim

[codesite-noreply]

Author: iratqq
Date: Mon Mar 24 01:22:45 2008
New Revision: 5337

Modified:
  trunk/uim/sj3.c

Log:
* uim/sj3.c
 (uim_sj3_open_with_list):
 Replace with CAR().
 (uim_sj3_douoncnt):
 Replace with MAKE_INT().


Modified: trunk/uim/sj3.c
==============================================================================
--- trunk/uim/sj3.c     (original)
+++ trunk/uim/sj3.c     Mon Mar 24 01:22:45 2008
@@ -161,7 +161,7 @@
  dict_list = uim_malloc(sizeof(char *) * dict_num);

  for (i = 0; i < dict_num; i++) {
-    dict_list[i] = uim_strdup(REFER_C_STR(uim_scm_car(dict_list_)));
+    dict_list[i] = uim_strdup(REFER_C_STR(CAR(dict_list_)));
    dict_list_ = CDR(dict_list_);
  }

@@ -280,7 +280,7 @@
  if (ret == -1)
    return uim_sj3_server_down_error();

-  return uim_scm_make_int(ret);
+  return MAKE_INT(ret);
}

static uim_lisp