Skip to content

Commit aa898a3

Browse files
committed
Batch #16 of roast RT -> GH ticket migration
1 parent b1d25cf commit aa898a3

File tree

13 files changed

+69
-54
lines changed

13 files changed

+69
-54
lines changed

S02-names/identifier.t

Lines changed: 6 additions & 6 deletions
Original file line numberDiff line numberDiff line change
@@ -36,7 +36,7 @@ plan 22;
3636
is foo-bar(), 'foo-bar', 'can call foo-bar()';
3737
}
3838

39-
# RT #64656
39+
# https://github.com/Raku/old-issue-tracker/issues/885
4040
{
4141
my sub do-check { 'do-check' }
4242
is do-check(), 'do-check', 'can call do-check()';
@@ -73,27 +73,27 @@ plan 22;
7373
is redo-check(), 'redo-check', 'can call redo-check';
7474
}
7575

76-
# RT #65804
76+
# https://github.com/Raku/old-issue-tracker/issues/1005
7777
{
7878
sub sub($foo) { $foo }
7979
is sub('RT #65804'), 'RT #65804', 'sub named "sub" works';
8080
}
8181

82-
# RT #68358
82+
# https://github.com/Raku/old-issue-tracker/issues/1217
8383
{
8484
my ($x);
8585
sub my($a) { $a + 17 }
8686
$x = 5;
8787
is my($x), 22, 'call to sub named "my" works';
8888
}
8989

90-
# RT #72898
90+
# https://github.com/Raku/old-issue-tracker/issues/1518
9191
{
9292
sub loop($a) { $a + 1 }
9393
is loop(5), 6, 'sub named "loop" works';
9494
}
9595

96-
# RT #77218
96+
# https://github.com/Raku/old-issue-tracker/issues/2069
9797
# Rakudo had troubles with identifiers whos prefix is an alphanumeric infix
9898
# operator; for example 'sub order' would fail because 'order' begins with
9999
# 'or'
@@ -111,7 +111,7 @@ plan 22;
111111
is $tempo, 'walking pace',
112112
'can call subroutines whos name begin with an alphabetic infix (and)';
113113

114-
# RT #75710
114+
# https://github.com/Raku/old-issue-tracker/issues/1833
115115
eval-lives-ok q{our sub xyz($abc) { $abc }; xyz(1);},
116116
'can call subroutine which starts with infix x';
117117
}

S02-names/indirect.t

Lines changed: 3 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -34,11 +34,13 @@ plan 10;
3434
is A."with space"(), 23, 'can declare indirect method name with space';
3535
}
3636

37-
# RT #126385
37+
# https://github.com/Raku/old-issue-tracker/issues/4634
3838
{
3939
ok ::('&say') =:= &say, '::("&foo") without whitespace';
4040
ok ::( '&say') =:= &say, '::("&foo") with whitespace (1)';
4141
ok ::( '&say' ) =:= &say, '::("&foo") with whitespace (2)';
4242
ok ::( # we do something explainable to have the need for a comment
4343
'&say' ) =:= &say, '::("&foo") with a comment';
4444
}
45+
46+
# vim: ft=perl6

S02-names/is_cached.t

Lines changed: 4 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -73,13 +73,15 @@ plan 38;
7373
is foo(42), 42, 'did we get the value back (1)';
7474
is-deeply @int, [42], 'was the code done (1)';
7575
is foo(42), 42, 'did we get the value back (2)';
76-
#?rakudo.jvm todo "is cached is only a hint: RT #122425"
76+
# https://github.com/Raku/old-issue-tracker/issues/3463
77+
#?rakudo.jvm todo "is cached is only a hint"
7778
is-deeply @int, [42], 'was the code done (2)';
7879

7980
is foo("Camelia"), "Camelia", 'did we get the value back (3)';
8081
is-deeply @str, [<Camelia>], 'was the code done (3)';
8182
is foo("Camelia"), "Camelia", 'did we get the value back (4)';
82-
#?rakudo.jvm todo "is cached is only a hint: RT #122425"
83+
# https://github.com/Raku/old-issue-tracker/issues/3463
84+
#?rakudo.jvm todo "is cached is only a hint"
8385
is-deeply @str, [<Camelia>], 'was the code done (4)';
8486
} #4
8587

S02-names/is_default.t

Lines changed: 12 additions & 10 deletions
Original file line numberDiff line numberDiff line change
@@ -65,7 +65,7 @@ plan 187;
6565
ok $a.d_var.default === Nil, 'is the default set correctly for $!d';
6666
} #19
6767

68-
# RT #125324
68+
# https://github.com/Raku/old-issue-tracker/issues/4291
6969
{
7070
my ($a, $b) is default(42);
7171
is $a, 42, 'is default() works on a group of variables too (1)';
@@ -342,7 +342,8 @@ plan 187;
342342
X::Parameter::Default::TypeCheck,
343343
expected => Hash[Int],
344344
got => Nil;
345-
#?rakudo 2 todo "LTA wrong kind of exception (RT #132081)"
345+
# https://github.com/Raku/old-issue-tracker/issues/6512
346+
#?rakudo 2 todo "LTA wrong kind of exception"
346347
throws-like 'class IntFoo { has Int $!a is default("foo") }',
347348
X::Parameter::Default::TypeCheck,
348349
expected => Int,
@@ -355,7 +356,8 @@ plan 187;
355356

356357
# native types
357358
{
358-
#?rakudo.jvm todo "RT #126519"
359+
# https://github.com/Raku/old-issue-tracker/issues/4703
360+
#?rakudo.jvm todo "defaults on native ints"
359361
throws-like 'my int $a is default(42)',
360362
X::Comp::Trait::NotOnNative,
361363
type => 'is',
@@ -371,14 +373,14 @@ plan 187;
371373
subtype => 'default';
372374
} #4
373375

374-
# RT #126104
376+
# https://github.com/Raku/old-issue-tracker/issues/4553
375377
lives-ok { EVAL 'my Any $a is default(3)' }, 'Default value that is subtype of constraint works fine';
376378
lives-ok { EVAL 'class Any3 { has Any $!a is default(3) }' }, 'Default value that is subtype of attribute constraint works fine';
377379

378-
# RT #126110
380+
# https://github.com/Raku/old-issue-tracker/issues/4557
379381
lives-ok { EVAL 'my $a is default(Mu); 1' }, 'Mu as a default value on an unconstrained Scalar works';
380382

381-
# RT #132082
383+
# https://github.com/Raku/old-issue-tracker/issues/6513
382384
subtest 'can use `Mu` as default for attributes' => {
383385
plan 3;
384386

@@ -391,13 +393,13 @@ subtest 'can use `Mu` as default for attributes' => {
391393
}
392394
}
393395

394-
# RT #126115
396+
# https://github.com/Raku/old-issue-tracker/issues/4561
395397
eval-lives-ok 'my $a is default(Failure.new); 1',
396398
'Failure.new as a default value on an unconstrained Scalar works';
397399
eval-lives-ok 'class NoneFailure { has $!a is default(Failure.new); 1}',
398400
'Failure.new as a default value on an unconstrained Scalar attribute works';
399401

400-
# RT #126107
402+
# https://github.com/Raku/old-issue-tracker/issues/4555
401403
subtest 'is default() respects type constraint' => {
402404
plan 2;
403405
subtest 'variable' => {
@@ -421,7 +423,7 @@ subtest 'is default() respects type constraint' => {
421423
}
422424
}
423425

424-
# RT #126107
426+
# https://github.com/Raku/old-issue-tracker/issues/4555
425427
subtest 'default `is default()` gets adjusted to type constraint' => {
426428
plan 2;
427429
subtest 'variable' => {
@@ -446,7 +448,7 @@ subtest 'default `is default()` gets adjusted to type constraint' => {
446448
}
447449
}
448450

449-
# RT#126318
451+
# https://github.com/Raku/old-issue-tracker/issues/4640
450452
{
451453
class DefaultTyped { has Int:D $.a is rw is default(42) }
452454
is DefaultTyped.new.a, 42, 'uninitialized typed:D attribute should have its default';

S02-names/name.t

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -67,7 +67,7 @@ plan 24;
6767
# is &a.VAR.name, '&a', "initialized typed sub should have name";
6868
} #2
6969

70-
# RT #126241
70+
# https://github.com/Raku/old-issue-tracker/issues/4616
7171
{
7272
is &[==].name, 'infix:<==>', '== op name uses <>';
7373
is &[=>].name, 'infix:«=>»', '=> op name uses «»';

S02-names/our.t

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -14,7 +14,7 @@ plan 10;
1414
is &OUR::eval_born(), 5, 'call to eval-born our sub via OUR works';
1515
}
1616

17-
# RT #63882
17+
# https://github.com/Raku/old-issue-tracker/issues/782
1818
{
1919
my enum A <a b c>;
2020
is +c, 2, 'c is 2 from enum';
@@ -25,7 +25,7 @@ plan 10;
2525
is OUR::c(), 'sub c', 'sub c called with OUR:: works';
2626
}
2727

28-
# RT #69460
28+
# https://github.com/Raku/old-issue-tracker/issues/1327
2929
{
3030
our $rt69460 = 1;
3131
lives-ok { EVAL 'class RT69460 { $GLOBAL::rt69460++ }' },

S02-names/pseudo-6c.t

Lines changed: 9 additions & 7 deletions
Original file line numberDiff line numberDiff line change
@@ -217,15 +217,17 @@ plan 159;
217217
ok &none =:= &f1, '... and works';
218218
lives-ok { CORE::.<&none> := &f2 }, 'CORE::.{} binding lives';
219219
ok &none =:= &f2, '... and works';
220-
#?rakudo 2 skip 'Cannot bind to &::("CORE")::foo RT #126113'
220+
# https://github.com/Raku/old-issue-tracker/issues/4560
221+
#?rakudo 2 skip 'Cannot bind to &::("CORE")::foo'
221222
lives-ok { &::($core)::none := &f3 }, '::("CORE") binding lives';
222223
ok &none =:= &f3, '... and works';
223224

224225
# in niecza v8, dynamic variables go through a separate code path.
225226
# make sure accessing it in CORE works
226227
lives-ok { $CORE::_ := 50 }, 'Binding to $CORE::_ lives';
227228
is $CORE::_, 50, 'Accessing $CORE::_ works';
228-
#?rakudo 2 skip 'Cannot bind to &::("CORE")::foo RT #126113'
229+
# https://github.com/Raku/old-issue-tracker/issues/4560
230+
#?rakudo 2 skip 'Cannot bind to &::("CORE")::foo'
229231
lives-ok { $::($core)::_ := 51 }, 'Binding to $::("CORE")::_ lives';
230232
is $::($core)::_, 51, 'Accessing $::("CORE")::_ works';
231233
}
@@ -250,7 +252,7 @@ plan 159;
250252
}
251253
}
252254

253-
#RT #89706
255+
# https://github.com/Raku/old-issue-tracker/issues/2420
254256
{
255257
$PROCESS::PROGRAM-NAME = "otter";
256258
is $*PROGRAM-NAME, "otter", 'existing $* assignable via PROCESS';
@@ -435,7 +437,7 @@ my $x110 = 110; #OK
435437

436438
# PARENT - NYI in any compiler
437439

438-
# RT #123154
440+
# https://github.com/Raku/old-issue-tracker/issues/3578
439441
{
440442
my $x = 'really unlikely value';
441443
ok MY::.values.grep({ ($_ // '') eq 'really unlikely value' }),
@@ -446,10 +448,10 @@ my $x110 = 110; #OK
446448
}
447449
}
448450

449-
# RT #129092
451+
# https://github.com/Raku/old-issue-tracker/issues/5617
450452
lives-ok { my @keys = CORE::.keys }, 'calling CORE::.keys lives';
451453

452-
# RT #119521
454+
# https://github.com/Raku/old-issue-tracker/issues/3222
453455
subtest 'no guts spillage when going too high up scope in pseudopackages' => {
454456
plan 3 + my @packs = <
455457
DYNAMIC:: OUTER:: CALLER:: UNIT:: MY:: CORE::
@@ -467,7 +469,7 @@ subtest 'no guts spillage when going too high up scope in pseudopackages' => {
467469
eval-lives-ok '$' ~ $_ x 100 ~ 'True', $_ for @packs;
468470
}
469471

470-
# GH #3058
472+
# https://github.com/rakudo/rakudo/issues/3058
471473
{
472474
is_run q|use v6.c; our constant &my-not = CORE::<&not>; print "ALIAS: ", my-not(False)|,
473475
{ out => q<ALIAS: True> },

S02-names/pseudo-6d.t

Lines changed: 8 additions & 6 deletions
Original file line numberDiff line numberDiff line change
@@ -217,15 +217,17 @@ plan 159;
217217
ok &none =:= &f1, '... and works';
218218
lives-ok { CORE::.<&none> := &f2 }, 'CORE::.{} binding lives';
219219
ok &none =:= &f2, '... and works';
220-
#?rakudo 2 skip 'Cannot bind to &::("CORE")::foo RT #126113'
220+
# https://github.com/Raku/old-issue-tracker/issues/4560
221+
#?rakudo 2 skip 'Cannot bind to &::("CORE")::foo'
221222
lives-ok { &::($core)::none := &f3 }, '::("CORE") binding lives';
222223
ok &none =:= &f3, '... and works';
223224

224225
# in niecza v8, dynamic variables go through a separate code path.
225226
# make sure accessing it in CORE works
226227
lives-ok { $CORE::_ := 50 }, 'Binding to $CORE::_ lives';
227228
is $CORE::_, 50, 'Accessing $CORE::_ works';
228-
#?rakudo 2 skip 'Cannot bind to &::("CORE")::foo RT #126113'
229+
# https://github.com/Raku/old-issue-tracker/issues/4560
230+
#?rakudo 2 skip 'Cannot bind to &::("CORE")::foo'
229231
lives-ok { $::($core)::_ := 51 }, 'Binding to $::("CORE")::_ lives';
230232
is $::($core)::_, 51, 'Accessing $::("CORE")::_ works';
231233
}
@@ -250,7 +252,7 @@ plan 159;
250252
}
251253
}
252254

253-
#RT #89706
255+
# https://github.com/Raku/old-issue-tracker/issues/2420
254256
{
255257
$PROCESS::PROGRAM-NAME = "otter";
256258
is $*PROGRAM-NAME, "otter", 'existing $* assignable via PROCESS';
@@ -435,7 +437,7 @@ my $x110 = 110; #OK
435437

436438
# PARENT - NYI in any compiler
437439

438-
# RT #123154
440+
# https://github.com/Raku/old-issue-tracker/issues/3578
439441
{
440442
my $x = 'really unlikely value';
441443
ok MY::.values.grep({ ($_ // '') eq 'really unlikely value' }),
@@ -446,10 +448,10 @@ my $x110 = 110; #OK
446448
}
447449
}
448450

449-
# RT #129092
451+
# https://github.com/Raku/old-issue-tracker/issues/5617
450452
lives-ok { my @keys = CORE::.keys }, 'calling CORE::.keys lives';
451453

452-
# RT #119521
454+
# https://github.com/Raku/old-issue-tracker/issues/3222
453455
subtest 'no guts spillage when going too high up scope in pseudopackages' => {
454456
plan 3 + my @packs = <
455457
DYNAMIC:: OUTER:: CALLER:: UNIT:: MY:: CORE::

S02-names/pseudo-6e.t

Lines changed: 10 additions & 8 deletions
Original file line numberDiff line numberDiff line change
@@ -294,15 +294,17 @@ plan 199;
294294
ok &none =:= &f1, '... and works';
295295
lives-ok { CORE::.<&none> := &f2 }, 'CORE::.{} binding lives';
296296
ok &none =:= &f2, '... and works';
297-
#?rakudo 2 skip 'Cannot bind to &::("CORE")::foo RT #126113'
297+
# https://github.com/Raku/old-issue-tracker/issues/4560
298+
#?rakudo 2 skip 'Cannot bind to &::("CORE")::foo'
298299
lives-ok { &::($core)::none := &f3 }, '::("CORE") binding lives';
299300
ok &none =:= &f3, '... and works';
300301

301302
# in niecza v8, dynamic variables go through a separate code path.
302303
# make sure accessing it in CORE works
303304
lives-ok { $CORE::_ := 50 }, 'Binding to $CORE::_ lives';
304305
is $CORE::_, 50, 'Accessing $CORE::_ works';
305-
#?rakudo 2 skip 'Cannot bind to &::("CORE")::foo RT #126113'
306+
# https://github.com/Raku/old-issue-tracker/issues/4560
307+
#?rakudo 2 skip 'Cannot bind to &::("CORE")::foo'
306308
lives-ok { $::($core)::_ := 51 }, 'Binding to $::("CORE")::_ lives';
307309
is $::($core)::_, 51, 'Accessing $::("CORE")::_ works';
308310
}
@@ -327,7 +329,7 @@ plan 199;
327329
}
328330
}
329331

330-
#RT #89706
332+
# https://github.com/Raku/old-issue-tracker/issues/2420
331333
{
332334
$PROCESS::PROGRAM-NAME = "otter";
333335
is $*PROGRAM-NAME, "otter", 'existing $* assignable via PROCESS';
@@ -498,7 +500,7 @@ my $x110 = 110; #OK
498500

499501
# PARENT - NYI in any compiler
500502

501-
# RT #123154
503+
# https://github.com/Raku/old-issue-tracker/issues/3578
502504
{
503505
my $x = 'really unlikely value';
504506
ok MY::.values.grep({ ($_ // '') eq 'really unlikely value' }),
@@ -509,10 +511,10 @@ my $x110 = 110; #OK
509511
}
510512
}
511513

512-
# RT #129092
514+
# https://github.com/Raku/old-issue-tracker/issues/5617
513515
lives-ok { my @keys = CORE::.keys }, 'calling CORE::.keys lives';
514516

515-
# RT #119521
517+
# https://github.com/Raku/old-issue-tracker/issues/3222
516518
subtest 'no guts spillage when going too high up scope in pseudopackages' => {
517519
plan 3 + my @packs = <
518520
DYNAMIC:: OUTER:: CALLER:: UNIT:: CORE::
@@ -588,11 +590,11 @@ subtest 'no guts spillage when going too high up scope in pseudopackages' => {
588590
}
589591
}
590592

591-
# RT #127536
593+
# https://github.com/Raku/old-issue-tracker/issues/5134
592594
is_run q|BEGIN { UNIT; Nil }|, { :0status, :out(''), :err('') },
593595
'no crash if UNIT:: is used at compile time';
594596

595-
# GH perl6/problem-solving#80
597+
# https://github.com/Raku/problem-solving/issues/80
596598
# Test for CORE::v6<rev> namespaces
597599
{
598600
for <c d e> -> $rev {

S02-names/strict.t

Lines changed: 4 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -25,13 +25,13 @@ is $Foo::foo, 42, 'lax declared variable is package scoped';
2525
is EVAL('$bar'), Any, 'lax mode propagates into EVAL blocks'
2626
}
2727

28-
# RT #123696
28+
# https://github.com/Raku/old-issue-tracker/issues/3660
2929
{
3030
lives-ok { EVAL '(6;)' },
3131
'"6;" no longer means "no strict;" and "(6;)" no longer results in a compile time error';
3232
}
3333

34-
# RT #125398
34+
# https://github.com/Raku/old-issue-tracker/issues/4318
3535
subtest '`no strict` does not cause autovivification container issues' => {
3636
plan 4;
3737

@@ -42,3 +42,5 @@ subtest '`no strict` does not cause autovivification container issues' => {
4242
lives-ok { %h<d><e> }, 'postcircumfix {} on Hash key'; # RT #125183
4343
isa-ok %h<non-existent>, Any, 'non-existent keys are `Any`';
4444
}
45+
46+
# vim: ft=perl6

0 commit comments

Comments
 (0)