| … | |
… | |
| 543 | |
543 | |
| 544 | BOOT: |
544 | BOOT: |
| 545 | { |
545 | { |
| 546 | HV *stash = gv_stashpv ("cf", 1); |
546 | HV *stash = gv_stashpv ("cf", 1); |
| 547 | |
547 | |
| 548 | const struct { |
548 | static const struct { |
| 549 | const char *name; |
549 | const char *name; |
| 550 | IV iv; |
550 | IV iv; |
| 551 | } *civ, const_iv[] = { |
551 | } *civ, const_iv[] = { |
| 552 | # define const_iv(name) { # name, (IV)name }, |
552 | # define const_iv(name) { # name, (IV)name }, |
| 553 | const_iv (llevError) |
553 | const_iv (llevError) |
| … | |
… | |
| 837 | }; |
837 | }; |
| 838 | |
838 | |
| 839 | for (civ = const_iv + sizeof (const_iv) / sizeof (const_iv [0]); civ-- > const_iv; ) |
839 | for (civ = const_iv + sizeof (const_iv) / sizeof (const_iv [0]); civ-- > const_iv; ) |
| 840 | newCONSTSUB (stash, (char *)civ->name, newSViv (civ->iv)); |
840 | newCONSTSUB (stash, (char *)civ->name, newSViv (civ->iv)); |
| 841 | |
841 | |
| 842 | const struct { |
842 | static const struct { |
| 843 | const char *name; |
843 | const char *name; |
| 844 | IV iv; |
844 | IV iv; |
| 845 | } *event, event_list[] = { |
845 | } *event, event_list[] = { |
| 846 | # define const_event(name) { # name, (IV)EVENT_ ## name }, |
846 | # define const_event(name) { # name, (IV)EVENT_ ## name }, |
| 847 | const_event (NONE) |
847 | const_event (NONE) |
| … | |
… | |
| 878 | AV *av = get_av ("cf::EVENT", 1); |
878 | AV *av = get_av ("cf::EVENT", 1); |
| 879 | |
879 | |
| 880 | for (event = event_list + sizeof (event_list) / sizeof (event_list [0]); event-- > event_list; ) |
880 | for (event = event_list + sizeof (event_list) / sizeof (event_list [0]); event-- > event_list; ) |
| 881 | av_store (av, event->iv, newSVpv ((char *)event->name, 0)); |
881 | av_store (av, event->iv, newSVpv ((char *)event->name, 0)); |
| 882 | |
882 | |
| 883 | const struct { |
883 | static const struct { |
| 884 | int dtype; |
884 | int dtype; |
| 885 | const char *name; |
885 | const char *name; |
| 886 | IV idx; |
886 | IV idx; |
| 887 | } *cprop, prop_table[] = { |
887 | } *cprop, prop_table[] = { |
| 888 | # define prop(type, name) { type, # name, (IV) CFAPI_ ## name }, |
888 | # define prop(type, name) { type, # name, (IV) CFAPI_ ## name }, |
