Don't curry if there's nothing to curry

This fixes the LTA error on e.g. Hash[]: Too few positionals passed; expected at least 3 arguments but got only 2
rakudo · Mar 23, 2015 · a57affe · a57affe
1 parent 9b5d4e2
commit a57affe
Showing 1 changed file with 6 additions and 3 deletions.
diff --git a/src/Perl6/World.nqp b/src/Perl6/World.nqp
@@ -1971,9 +1971,12 @@ class Perl6::World is HLL::World {
     # Curries a role with the specified arguments.
     method parameterize_type_with_args($role, @pos_args, %named_args) {
         # Make the curry right away and add it to the SC.
-        my $curried := $role.HOW.parameterize($role, |@pos_args, |%named_args);
-        self.add_object($curried);
-        return $curried;
+        if @pos_args || %named_args {
+            my $curried := $role.HOW.parameterize($role, |@pos_args, |%named_args);
+            self.add_object($curried);
+            return $curried;
+        }
+        $role;
     }
 
     # Creates a subset type meta-object/type object pair.