3735c92ae5376ff92cf2c52ebb0aa224ca42542c
[m17n/m17n-test.git] / imlist.c
1 #include <stdio.h>
2 #include <string.h>
3 #include <m17n.h>
4 #include <m17n-misc.h>
5
6 int
7 main (int argc, char **argv)
8 {
9   MSymbol lang;
10   MPlist *imlist, *pl;
11
12   M17N_INIT ();
13   lang = (argc > 1) ? msymbol (argv[1]) : Mnil;
14   imlist = minput_list (lang);
15   for (pl = imlist; mplist_key (pl) != Mnil; pl = mplist_next (pl))
16     {
17       MPlist *p = mplist_value (pl);
18       MSymbol name;
19
20       lang = mplist_value (p);
21       p = mplist_next (p);
22       name = mplist_value (p);
23
24       printf ("%s %s\n", msymbol_name (lang), msymbol_name (name));
25     }
26
27   m17n_object_unref (imlist);
28   M17N_FINI ();
29   exit (0);
30 }
31