*** empty log message ***

[m17n/m17n-test.git] / imlist.c

diff --git a/imlist.c b/imlist.c
index 3735c92..3ea2172 100644 (file)
--- a/imlist.c
+++ b/imlist.c
@@ -1,27 +1,27 @@
 #include <stdio.h>
 #include <string.h>
 #include <m17n.h>
-#include <m17n-misc.h>
 
 int
 main (int argc, char **argv)
 {
-  MSymbol lang;
   MPlist *imlist, *pl;
 
   M17N_INIT ();
-  lang = (argc > 1) ? msymbol (argv[1]) : Mnil;
-  imlist = minput_list (lang);
+  imlist = minput_list ((argc > 1) ? msymbol (argv[1]) : Mnil);
   for (pl = imlist; mplist_key (pl) != Mnil; pl = mplist_next (pl))
     {
       MPlist *p = mplist_value (pl);
-      MSymbol name;
+      MSymbol lang, name, sane;
 
       lang = mplist_value (p);
       p = mplist_next (p);
       name = mplist_value (p);
+      p = mplist_next (p);
+      sane = mplist_value (p);
 
-      printf ("%s %s\n", msymbol_name (lang), msymbol_name (name));
+      printf ("%s %s %s\n", msymbol_name (lang), msymbol_name (name),
+             sane == Mt ? "ok" : "no");
     }
 
   m17n_object_unref (imlist);