Make banning of length() and bytes() compile time

Now uses the suggested subroutine mechanism for getting the message across
rather than actually creating multi subs for length() and bytes()

src/Perl6/World.nqp

@@ -2379,6 +2379,14 @@ class Perl6::World is HLL::World {
         self.walk_symbols(&evaluate);
 
         levenshtein_candidate_heuristic(@candidates, @suggestions);
+        if $name eq '&length' {
+            @suggestions.push: 'chars';
+            @suggestions.push: 'graphs';
+            @suggestions.push: 'codes';
+        }
+        elsif $name eq '&bytes' {
+            @suggestions.push: '.encode($encoding).bytes';
+        }
         return @suggestions;
     }
 

src/core/Any.pm

@@ -400,21 +400,6 @@ proto sub item(|) is pure { * }
 multi sub item(*@a) { my $ = @a }
 multi sub item(Mu $a) { $a }
 
-proto sub length(|) { * }
-multi sub length (|) is hidden_from_backtrace {
-    fail X::Routine::Banned.new(
-        banned     => "length()",
-        didyoumean => "chars(), graphs() or codes()",
-    )
-}
-proto sub bytes(|) { * }
-multi sub bytes (|) is hidden_from_backtrace {
-    fail X::Routine::Banned.new(
-        banned     => "bytes()",
-        didyoumean => ".encode(\$encoding).bytes",
-    )
-}
-
 my $default= [];       # so that we can check missing parameters
 sub RWPAIR(\k, \v) {   # internal fast pair creation
     my \p := nqp::create(Pair);