We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
There was an error while loading. Please reload this page.
1 parent a08b1a0 commit 6290332Copy full SHA for 6290332
type-graph.txt
@@ -50,6 +50,7 @@ class Attribute
50
51
[Domain-specific]
52
# VM
53
+role Systemic
54
class Distro
55
class Kernel
56
class VM does Systemic
@@ -483,4 +484,4 @@ class CX::Succeed does X::Control
483
484
class CX::Proceed does X::Control
485
486
[Core]
-class Test
487
+module Test
xt/type-graph.t
@@ -10,7 +10,7 @@ my $t = Perl6::TypeGraph.new-from-file('type-graph.txt');
10
11
for $t.sorted -> $type {
12
next if $type.name.index('Metamodel').defined || $type.name eq 'PROCESS';
13
- next if $type.packagetype eq 'role';
+ next if $type.packagetype eq 'role'|'module';
14
next if $type.name eq 'Failure';
15
try {
16
my $got = ~$type.mro;
0 commit comments