Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
Browse files

[t/spec] Another Null PMC test inspired by IRC

git-svn-id: http://svn.pugscode.org/pugs@27879 c213334d-75ef-0310-aa23-eaa082d1ae64
  • Loading branch information...
commit caf2d4b84eade568e6e308c93915080acfb6f38f 1 parent cd114c6
kyle authored
Showing with 8 additions and 1 deletion.
  1. +8 −1 S12-enums/thorough.t
View
9 S12-enums/thorough.t
@@ -2,7 +2,7 @@ use v6;
use Test;
-plan 68;
+plan 69;
=begin description
@@ -94,4 +94,11 @@ sub test_stuff($x) {
ok True.perl ~~/^ 'Bool::True'/, 'True.perl';
ok Bool::True.perl ~~/^ 'Bool::True'/, 'Bool::True.perl';
+{
+ enum Negation << :isnt<isnt> :arent<arent> :amnot<amnot> :aint<aint> >>;
+ my Negation $foo;
+ #?rakudo todo 'Null PMC Access in invoke()'
+ lives_ok { $foo = Negation::isnt }, 'simple assignment from enum';
+}
+
# vim: ft=perl6
Please sign in to comment.
Something went wrong with that request. Please try again.