develooper Front page | perl.perl5.changes | Postings from February 2018

[perl.git] branch blead updated. v5.27.8-146-g9fc6ca9da4

From:
Hugo Van der Sanden
Date:
February 3, 2018 16:03
Subject:
[perl.git] branch blead updated. v5.27.8-146-g9fc6ca9da4
Message ID:
E1ei0Gp-0000Ik-7s@git.dc.perl.space
In perl.git, the branch blead has been updated

<https://perl5.git.perl.org/perl.git/commitdiff/9fc6ca9da4208eb58a2ad8169b81757082a52f85?hp=4c9dbfe5095070ad796340a4a65461e4cfd7a3ce>

- Log -----------------------------------------------------------------
commit 9fc6ca9da4208eb58a2ad8169b81757082a52f85
Author: Hugo van der Sanden <hv@crypt.org>
Date:   Sat Feb 3 16:04:08 2018 +0000

    Skip t/op/state.t tests that need attributes under miniperl

-----------------------------------------------------------------------

Summary of changes:
 t/op/state.t | 19 +++++++++++--------
 1 file changed, 11 insertions(+), 8 deletions(-)

diff --git a/t/op/state.t b/t/op/state.t
index 67439be893..7aef435ffd 100644
--- a/t/op/state.t
+++ b/t/op/state.t
@@ -391,14 +391,17 @@ foreach my $spam (@spam) {
 
 
 foreach my $forbidden (<DATA>) {
-    chomp $forbidden;
-    no strict 'vars';
-    eval $forbidden;
-    like $@,
-         qr/dynamic loading not available(?x:
-          )|Attempt to reload attributes\.pm aborted(?x:
-          )|Initialization of state variables in list currently forbidden/,
-        "Currently forbidden: $forbidden";
+    SKIP: {
+        skip_if_miniperl("miniperl can't load attributes.pm", 1)
+                if $forbidden =~ /:shared/;
+
+        chomp $forbidden;
+        no strict 'vars';
+        eval $forbidden;
+        like $@,
+            qr/Initialization of state variables in list currently forbidden/,
+            "Currently forbidden: $forbidden";
+    }
 }
 
 # [perl #49522] state variable not available

-- 
Perl5 Master Repository



nntp.perl.org: Perl Programming lists via nntp and http.
Comments to Ask Bjørn Hansen at ask@perl.org | Group listing | About