New issue
Have a question about this project? Sign up for a free GitHub account to open an issue and contact its maintainers and the community.
By clicking “Sign up for GitHub”, you agree to our terms of service and privacy statement. We’ll occasionally send you account related emails.
Already on GitHub? Sign in to your account
segmentation fault on the 'say 1..{$_}' #1254
Comments
From @ilyabelikinHi there, say 1..{$_} Thank you! |
From frioux@gmail.comWhat did you expect this to produce? Generally speaking I would have |
The RT System itself - Status changed from 'new' to 'open' |
From @ilyabelikinHi, 2009/8/30 fREW Schmidt via RT <perl6-bugs-followup@perl.org>:
|
From @ShimmerFairy<lue> rakudo: say 1..{$_} # checking a ticket Well, now it just hangs. At least it's not a segfault :) |
From @bbkrOn Kiev build: $ perl6 -e '(1..{$_}).WHAT.say' Taken for tests |
From @bbkrTests added in S03-operators/range.t |
@bbkr - Status changed from 'open' to 'resolved' |
From @kylehaThis is an automatically generated mail to inform you that tests are now available in t/spec/S03-operators/range.t commit e86dbd27f17ba176d80d25819e9d77e4cbca8995 [t/spec] tests for RT #68788 segmentation fault on the "say 1..{$_}" Inline Patchdiff --git a/t/spec/S03-operators/range.t b/t/spec/S03-operators/range.t
index 8a36cd6..96e17db 100644
--- a/t/spec/S03-operators/range.t
+++ b/t/spec/S03-operators/range.t
@@ -2,7 +2,7 @@ use v6;
use Test;
-plan 114;
+plan 116;
# L<S03/Nonchaining binary precedence/Range object constructor>
@@ -213,5 +213,11 @@ is (1..6 Z 'a' .. 'c').join, '1a2b3c', 'Ranges and infix:<Z>';
ok !defined(try { 0 .. (0, 1, 2) }), '0 .. List is illegal';
}
+# RT #68788
+{
+ $_ = Any; # unsetting $_ to reproduce bug literally
+ lives_ok {(1..$_)}, '(1..$_) lives';
+ isa_ok (1..$_), Range, '(..) works on Int .. Any';
+}
# # vim: ft=perl6 |
Migrated from rt.perl.org#68788 (status was 'resolved')
Searchable as RT68788$
The text was updated successfully, but these errors were encountered: