From a730510ae76308fe5e6fe7e041ec9fb78152ceb9 Mon Sep 17 00:00:00 2001 From: Father Chrysostomos Date: Sun, 25 Dec 2011 00:44:49 -0800 Subject: [PATCH] =?utf8?q?Document=20=E2=80=98Attempt=20to=20clear=20delet?= =?utf8?q?ed=20array=E2=80=99=20in=20perldiag?= MIME-Version: 1.0 Content-Type: text/plain; charset=utf8 Content-Transfer-Encoding: 8bit --- pod/perldiag.pod | 7 +++++++ t/porting/diag.t | 1 - 2 files changed, 7 insertions(+), 1 deletion(-) diff --git a/pod/perldiag.pod b/pod/perldiag.pod index 8699847..d5b1ff4 100644 --- a/pod/perldiag.pod +++ b/pod/perldiag.pod @@ -283,6 +283,13 @@ example by: bless $self, "$proto"; +=item Attempt to clear deleted array + +(S debugging) An array was assigned to when it was being freed. +Freed values are not supposed to be visible to Perl code. This +can also happen if XS code calls C from a custom magic +callback on the array. + =item Attempt to delete disallowed key '%s' from a restricted hash (F) The failing code attempted to delete from a restricted hash a key diff --git a/t/porting/diag.t b/t/porting/diag.t index 4753406..7f45c2b 100644 --- a/t/porting/diag.t +++ b/t/porting/diag.t @@ -353,7 +353,6 @@ Malformed UTF-8 character (unexpected non-continuation byte 0x%x, immediately af %s (%d) does not match %s (%d), %s (%d) smaller than %s (%d), -Attempt to clear deleted array Attempt to free non-existent shared string '%s'%s Attempt to free temp prematurely: SV 0x%x Attempt to free unreferenced scalar: SV 0x%x -- 2.7.4