X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=mg.h;h=bdafe261e9445e15775c431bf78971f48b50ffbf;hb=0053d415f506c0bd87de287f5b4d68652d94b7b1;hp=05ad08bf5a536d15550b088f4c70469b6e4a1c21;hpb=9bd878171021311bd025e403714388c68ff5d9e2;p=p5sagit%2Fp5-mst-13.2.git diff --git a/mg.h b/mg.h index 05ad08b..bdafe26 100644 --- a/mg.h +++ b/mg.h @@ -1,7 +1,7 @@ /* mg.h * * Copyright (C) 1991, 1992, 1993, 1994, 1995, 1996, 1997, 1999, - * 2000, 2002, 2005, 2006, by Larry Wall and others + * 2000, 2002, 2005, 2006, 2007, by Larry Wall and others * * You may distribute under the terms of either the GNU General Public * License or the Artistic License, as specified in the README file. @@ -18,7 +18,7 @@ struct mgvtbl { int (CPERLscope(*svt_clear))(pTHX_ SV *sv, MAGIC* mg); int (CPERLscope(*svt_free)) (pTHX_ SV *sv, MAGIC* mg); int (CPERLscope(*svt_copy)) (pTHX_ SV *sv, MAGIC* mg, - SV *nsv, const char *name, int namlen); + SV *nsv, const char *name, I32 namlen); int (CPERLscope(*svt_dup)) (pTHX_ MAGIC *mg, CLONE_PARAMS *param); int (CPERLscope(*svt_local))(pTHX_ SV *nsv, MAGIC *mg); }; @@ -60,3 +60,13 @@ struct magic { #define SvTIED_mg(sv,how) (SvRMAGICAL(sv) ? mg_find((sv),(how)) : NULL) #define SvTIED_obj(sv,mg) \ ((mg)->mg_obj ? (mg)->mg_obj : sv_2mortal(newRV(sv))) + +/* + * Local variables: + * c-indentation-style: bsd + * c-basic-offset: 4 + * indent-tabs-mode: t + * End: + * + * ex: set ts=8 sts=4 sw=4 noet: + */