diff options
| author | Jarkko Hietaniemi <jhi@iki.fi> | 2001-05-30 13:36:28 +0000 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2001-05-30 13:36:28 +0000 |
| commit | 516a5887ee93ac51c15492c01bb2e52bafd5bfaf (patch) | |
| tree | 2edd49fae5fcdc2d692fc0d6fe4779a740171b58 /dump.c | |
| parent | a2e20b18d842b4285c1fb6554e5ff55510293193 (diff) | |
| download | perl-516a5887ee93ac51c15492c01bb2e52bafd5bfaf.tar.gz | |
Medley of -Wall cleanups from Michael Schwen, Hugo van der Sanden,
and Abhijit Menon-Sen.
p4raw-id: //depot/perl@10321
Diffstat (limited to 'dump.c')
| -rw-r--r-- | dump.c | 71 |
1 files changed, 36 insertions, 35 deletions
@@ -712,41 +712,42 @@ Perl_gv_dump(pTHX_ GV *gv) */ static struct { char type; char *name; } magic_names[] = { - PERL_MAGIC_sv, "sv(\\0)", - PERL_MAGIC_arylen, "arylen(#)", - PERL_MAGIC_glob, "glob(*)", - PERL_MAGIC_pos, "pos(.)", - PERL_MAGIC_backref, "backref(<)", - PERL_MAGIC_overload, "overload(A)", - PERL_MAGIC_bm, "bm(B)", - PERL_MAGIC_regdata, "regdata(D)", - PERL_MAGIC_env, "env(E)", - PERL_MAGIC_isa, "isa(I)", - PERL_MAGIC_dbfile, "dbfile(L)", - PERL_MAGIC_tied, "tied(P)", - PERL_MAGIC_sig, "sig(S)", - PERL_MAGIC_uvar, "uvar(U)", - PERL_MAGIC_overload_elem, "overload_elem(a)", - PERL_MAGIC_overload_table, "overload_table(c)", - PERL_MAGIC_regdatum, "regdatum(d)", - PERL_MAGIC_envelem, "envelem(e)", - PERL_MAGIC_fm, "fm(f)", - PERL_MAGIC_regex_global, "regex_global(g)", - PERL_MAGIC_isaelem, "isaelem(i)", - PERL_MAGIC_nkeys, "nkeys(k)", - PERL_MAGIC_dbline, "dbline(l)", - PERL_MAGIC_mutex, "mutex(m)", - PERL_MAGIC_collxfrm, "collxfrm(o)", - PERL_MAGIC_tiedelem, "tiedelem(p)", - PERL_MAGIC_tiedscalar, "tiedscalar(q)", - PERL_MAGIC_qr, "qr(r)", - PERL_MAGIC_sigelem, "sigelem(s)", - PERL_MAGIC_taint, "taint(t)", - PERL_MAGIC_vec, "vec(v)", - PERL_MAGIC_substr, "substr(x)", - PERL_MAGIC_defelem, "defelem(y)", - PERL_MAGIC_ext, "ext(~)", - 0, 0 /* this null string terminates the list */ + { PERL_MAGIC_sv, "sv(\\0)" }, + { PERL_MAGIC_arylen, "arylen(#)" }, + { PERL_MAGIC_glob, "glob(*)" }, + { PERL_MAGIC_pos, "pos(.)" }, + { PERL_MAGIC_backref, "backref(<)" }, + { PERL_MAGIC_overload, "overload(A)" }, + { PERL_MAGIC_bm, "bm(B)" }, + { PERL_MAGIC_regdata, "regdata(D)" }, + { PERL_MAGIC_env, "env(E)" }, + { PERL_MAGIC_isa, "isa(I)" }, + { PERL_MAGIC_dbfile, "dbfile(L)" }, + { PERL_MAGIC_tied, "tied(P)" }, + { PERL_MAGIC_sig, "sig(S)" }, + { PERL_MAGIC_uvar, "uvar(U)" }, + { PERL_MAGIC_overload_elem, "overload_elem(a)" }, + { PERL_MAGIC_overload_table, "overload_table(c)" }, + { PERL_MAGIC_regdatum, "regdatum(d)" }, + { PERL_MAGIC_envelem, "envelem(e)" }, + { PERL_MAGIC_fm, "fm(f)" }, + { PERL_MAGIC_regex_global, "regex_global(g)" }, + { PERL_MAGIC_isaelem, "isaelem(i)" }, + { PERL_MAGIC_nkeys, "nkeys(k)" }, + { PERL_MAGIC_dbline, "dbline(l)" }, + { PERL_MAGIC_mutex, "mutex(m)" }, + { PERL_MAGIC_collxfrm, "collxfrm(o)" }, + { PERL_MAGIC_tiedelem, "tiedelem(p)" }, + { PERL_MAGIC_tiedscalar, "tiedscalar(q)" }, + { PERL_MAGIC_qr, "qr(r)" }, + { PERL_MAGIC_sigelem, "sigelem(s)" }, + { PERL_MAGIC_taint, "taint(t)" }, + { PERL_MAGIC_vec, "vec(v)" }, + { PERL_MAGIC_substr, "substr(x)" }, + { PERL_MAGIC_defelem, "defelem(y)" }, + { PERL_MAGIC_ext, "ext(~)" }, + /* this null string terminates the list */ + { 0, 0 }, }; void |