{"body":"OLX-RJ233:Injector fernando$ cat test-inject-param.p6 \nmulti trait_mod:<is>(Parameter:D $p, :$injected!) {\n    $p.set_default({\"12345\"});\n}\nmulti trait_mod:<is>(Routine:D $r, :$changed!) {\n    $r.signature does role {\n        method decrement-arity(Int $num) {\n            my $sig = $r.signature;\n            my $arity = $sig.^attributes.first(｢$!arity｣);\n            $arity.set_value($sig, $arity.get_value($sig) - $num)\n        }\n    }\n    $r.signature.decrement-arity: 1\n}\nsub bla($a is injected) is changed {\n    $a.say\n}\nbla\nOLX-RJ233:Injector fernando$ perl6 test-inject-param.p6 \n===SORRY!=== Error while compiling test-inject-param.p6\nCalling bla() will never work with declared signature ($a = -> ;; $_? is raw { #`(Block|140404727786232) ... })\nat test-inject-param.p6:17\n------> <BOL>⏏bla\nOLX-RJ233:Injector fernando$","name":"","extension":"txt","url":"https://www.irccloud.com/pastebin/sky3GWnM","modified":1488992068,"id":"sky3GWnM","size":834,"lines":24,"own_paste":false,"theme":"","date":1488992068}