summaryrefslogtreecommitdiff
path: root/pp_sys.c
diff options
context:
space:
mode:
authorNicholas Clark <nick@ccl4.org>2009-04-13 08:43:30 +0100
committerNicholas Clark <nick@ccl4.org>2009-04-13 08:43:30 +0100
commitd32faaf3b401b4c02872bfb2f57e48e11b3a1d28 (patch)
tree0b9f5c0f005c2be5689c9c7fc00fcd345cc426af /pp_sys.c
parent009f650f63e8acd928fc3a7bd09802d4edaadad9 (diff)
downloadperl-d32faaf3b401b4c02872bfb2f57e48e11b3a1d28.tar.gz
GvUNIQUE* have been defined as 0 since 2005/06/30 - high time to remove them.
Diffstat (limited to 'pp_sys.c')
-rw-r--r--pp_sys.c5
1 files changed, 0 insertions, 5 deletions
diff --git a/pp_sys.c b/pp_sys.c
index 28407e0716..01793236db 100644
--- a/pp_sys.c
+++ b/pp_sys.c
@@ -804,11 +804,6 @@ PP(pp_tie)
break;
case SVt_PVGV:
if (isGV_with_GP(varsv)) {
-#ifdef GV_UNIQUE_CHECK
- if (GvUNIQUE((const GV *)varsv)) {
- Perl_croak(aTHX_ "Attempt to tie unique GV");
- }
-#endif
methname = "TIEHANDLE";
how = PERL_MAGIC_tiedscalar;
/* For tied filehandles, we apply tiedscalar magic to the IO