From 23cfd2fcc891e2298c078e093010af5bdb902cc6 Mon Sep 17 00:00:00 2001 From: Nicholas Clark Date: Sun, 15 May 2011 16:33:02 +0100 Subject: Sort magic and magic vtable names in files generated by mg_vtable.pl Magic is sorted case insensitively, with upper case before lower case. vtable names are all lowercase letters. --- mg_names.c | 18 +++++++++--------- 1 file changed, 9 insertions(+), 9 deletions(-) (limited to 'mg_names.c') diff --git a/mg_names.c b/mg_names.c index 1287a00212..ff73b9e38e 100644 --- a/mg_names.c +++ b/mg_names.c @@ -7,10 +7,16 @@ */ { PERL_MAGIC_sv, "sv(\\0)" }, + { PERL_MAGIC_arylen, "arylen(#)" }, + { PERL_MAGIC_rhash, "rhash(%)" }, + { PERL_MAGIC_pos, "pos(.)" }, + { PERL_MAGIC_symtab, "symtab(:)" }, + { PERL_MAGIC_backref, "backref(<)" }, + { PERL_MAGIC_arylen_p, "arylen_p(@)" }, { PERL_MAGIC_overload, "overload(A)" }, { PERL_MAGIC_overload_elem, "overload_elem(a)" }, - { PERL_MAGIC_overload_table, "overload_table(c)" }, { PERL_MAGIC_bm, "bm(B)" }, + { PERL_MAGIC_overload_table, "overload_table(c)" }, { PERL_MAGIC_regdata, "regdata(D)" }, { PERL_MAGIC_regdatum, "regdatum(d)" }, { PERL_MAGIC_env, "env(E)" }, @@ -36,18 +42,12 @@ { PERL_MAGIC_taint, "taint(t)" }, { PERL_MAGIC_uvar, "uvar(U)" }, { PERL_MAGIC_uvar_elem, "uvar_elem(u)" }, - { PERL_MAGIC_vec, "vec(v)" }, { PERL_MAGIC_vstring, "vstring(V)" }, + { PERL_MAGIC_vec, "vec(v)" }, { PERL_MAGIC_utf8, "utf8(w)" }, { PERL_MAGIC_substr, "substr(x)" }, { PERL_MAGIC_defelem, "defelem(y)" }, - { PERL_MAGIC_arylen, "arylen(#)" }, - { PERL_MAGIC_pos, "pos(.)" }, - { PERL_MAGIC_backref, "backref(<)" }, - { PERL_MAGIC_symtab, "symtab(:)" }, - { PERL_MAGIC_rhash, "rhash(%)" }, - { PERL_MAGIC_arylen_p, "arylen_p(@)" }, - { PERL_MAGIC_ext, "ext(~)" }, { PERL_MAGIC_checkcall, "checkcall(])" }, + { PERL_MAGIC_ext, "ext(~)" }, /* ex: set ro: */ -- cgit v1.2.1