Skip to content
This repository

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
Browse code

[t/spec] Test for RT 65658

git-svn-id: http://svn.pugscode.org/pugs@28783 c213334d-75ef-0310-aa23-eaa082d1ae64
  • Loading branch information...
commit 1223acd172566c5f3864c79785b525d25659548e 1 parent 189e26b
authored

Showing 1 changed file with 11 additions and 1 deletion. Show diff stats Hide diff stats

  1. 12  S12-enums/thorough.t
12  S12-enums/thorough.t
@@ -2,7 +2,7 @@ use v6;
2 2
 
3 3
 use Test;
4 4
 
5  
-plan 71;
  5
+plan *;
6 6
 
7 7
 =begin description
8 8
 
@@ -110,4 +110,14 @@ ok Bool::True.perl ~~/^ 'Bool::True'/, 'Bool::True.perl';
110 110
     eval_dies_ok 'RT66886::c', 'accessing non-value of enum dies proper-like';
111 111
 }
112 112
 
  113
+# RT #65658
  114
+{
  115
+    enum RT65658 <Todo Bug Feature Ticket>;
  116
+    #?rakudo 2 skip 'RT 65658'
  117
+    is RT65658(2), RT65658::Feature, 'can index enum by number';
  118
+    is RT65658((Todo + 3.2).Int), RT65658::Ticket, 'enum and math and index';
  119
+}
  120
+
  121
+done_testing;
  122
+
113 123
 # vim: ft=perl6

0 notes on commit 1223acd

Please sign in to comment.
Something went wrong with that request. Please try again.