Use optional positional parameter for archetypes method

To conform with rakudo/rakudo#4993
niner · Jul 21, 2022 · a164dd1 · a164dd1
1 parent f587960
commit a164dd1
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/lib/Inline/Perl5/ClassHOW.pm6 b/lib/Inline/Perl5/ClassHOW.pm6
@@ -123,7 +123,7 @@ class Inline::Perl5::ClassHOW
 
     my $archetypes := Metamodel::Archetypes.new(
         :nominal(1), :inheritable(1), :augmentable(1) );
-    method archetypes() {
+    method archetypes($obj?) {
         $archetypes
     }