fontset.c

   1 #include <stdio.h>
   2 #include <stdlib.h>
   3 #include <string.h>
   4
   5 #include <m17n.h>
   6
   7 int
   8 main ()
   9 {
  10   MPlist *script_list, *plist;
  11
  12   M17N_INIT ();
  13
  14   script_list = mscript_list ();
  15   for (plist = script_list; mplist_key (plist) != Mnil;
  16        plist = mplist_next (plist))
  17     {
  18       MSymbol script = mplist_value (plist);
  19       MPlist *lang_list = mscript_language_list (script);
  20
  21       printf ("SCRIPT=%s\n", msymbol_name (script));
  22
  23       if (lang_list)
  24         for (; mplist_key (lang_list) != Mnil;
  25              lang_list = mplist_next (lang_list))
  26           {
  27             MSymbol language = mplist_value (lang_list);
  28
  29             printf ("  LANGUAGE=%s\n", msymbol_name (language));
  30           }
  31     }
  32   m17n_object_unref (script_list);
  33
  34   M17N_FINI ();
  35   exit (0);
  36 }