3 type_name = ""; # GtkEnumType
4 type_macro = ""; # GTK_TYPE_ENUM_TYPE
5 type_ident = ""; # _gtk_enum_type
11 for (i = 2; i < ARGC; i++)
13 if (ARGV[i] == "macros")
15 else if (ARGV[i] == "entries")
17 else if (ARGV[i] == "variables")
23 printf ("/* type macros, generated by maketypes.awk */\n\n");
25 printf ("/* type entries, generated by maketypes.awk */\n\n");
27 printf ("/* type variables, generated by maketypes.awk */\n\n");
30 printf ("hm? what do you want me to do?\n") > "/dev/stderr";
35 function set_type (set_type_1)
38 type_name = set_type_1;
39 type_macro = "GTK_TYPE";
41 for (i = 0; i < length (type_name); i++)
43 ch = substr (type_name, i + 1, 1);
47 type_macro = type_macro "_" Ch;
48 type_ident = type_ident "_" tolower (ch);
52 type_macro = type_macro Ch;
53 type_ident = type_ident ch;
56 sub ("^GTK_TYPE_GTK_", "GTK_TYPE_", type_macro);
59 function generate (generate_1)
63 printf ("extern GtkType %s;\n", type_macro);
67 printf (" { \"%s\", &%s,\n", type_name, type_macro);
68 if (generate_1 == "BOXED")
69 printf (" GTK_TYPE_%s, NULL },\n", generate_1);
71 printf (" GTK_TYPE_%s, %s_values },\n", generate_1, type_ident);
75 printf ("GtkType %s = 0;\n", type_macro);
79 # skip scheme comments
88 printf ("huh? define-enum keyword without arg?\n") > "/dev/stderr";
98 printf ("huh? define-flags keyword without arg?\n") > "/dev/stderr";
108 printf ("huh? define-boxed keyword without arg?\n") > "/dev/stderr";
118 printf("\n#define\tGTK_TYPE_NUM_BUILTINS\t(%u)\n", type_counter);