summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--toke.c2
-rw-r--r--xsutils.c6
2 files changed, 4 insertions, 4 deletions
diff --git a/toke.c b/toke.c
index 76be79bfe6..e177cefeaf 100644
--- a/toke.c
+++ b/toke.c
@@ -3091,7 +3091,7 @@ Perl_yylex(pTHX)
else if (!PL_in_my && len == 6 && strnEQ(s, "method", len))
CvMETHOD_on(PL_compcv);
#ifdef USE_ITHREADS
- else if (PL_in_my == KEY_our && len == 6 && strnEQ(s, "shared", len))
+ else if (PL_in_my == KEY_our && len == 6 && strnEQ(s, "unique", len))
GvSHARED_on(cGVOPx_gv(yylval.opval));
#endif
/* After we've set the flags, it could be argued that
diff --git a/xsutils.c b/xsutils.c
index 9df4ce4121..fd43e23d65 100644
--- a/xsutils.c
+++ b/xsutils.c
@@ -85,7 +85,7 @@ modify_SV_attributes(pTHXo_ SV *sv, SV **retlist, SV **attrlist, int numattrs)
}
break;
case 's':
- if (strEQ(name, "shared")) {
+ if (strEQ(name, "unique")) {
if (negated)
GvSHARED_off(CvGV((CV*)sv));
else
@@ -102,7 +102,7 @@ modify_SV_attributes(pTHXo_ SV *sv, SV **retlist, SV **attrlist, int numattrs)
case 6:
switch (*name) {
case 's':
- if (strEQ(name, "shared")) {
+ if (strEQ(name, "unique")) {
/* toke.c has already marked as GvSHARED */
continue;
}
@@ -190,7 +190,7 @@ usage:
if (cvflags & CVf_METHOD)
XPUSHs(sv_2mortal(newSVpvn("method", 6)));
if (GvSHARED(CvGV((CV*)sv)))
- XPUSHs(sv_2mortal(newSVpvn("shared", 6)));
+ XPUSHs(sv_2mortal(newSVpvn("unique", 6)));
break;
default:
break;