fix compilation errors

Author: coke

doc/Type/Map.pod6

@@ -27,7 +27,7 @@ operator:
 
     my $map = Map.new('a', 1, 'b', 2);
     say $map{'a'};      # OUTPUT: «1␤»
-    say $m{ 'a', 'b' }; # OUTPUT: «(1 2)␤»
+    say $map{ 'a', 'b' }; # OUTPUT: «(1 2)␤»
 
 To check whether a given key is stored in a Map, modify the access
 with the C<:exists> adverb:

doc/Type/SetHash.pod6

@@ -77,11 +77,10 @@ It is also possible to initialize a single key with the use of C<{}>:
 
 or, in order to initialize more than one key at the same time, use a list assignment:
 
-   $sh = SetHash.new;
+   my $sh = SetHash.new;
    $sh{ 'a', 'b', 'c' } = True, False, True;
    say $sh.keys.perl;  # OUTPUT: «("a", "c").Seq␤»
 
-
 =head1 Operators
 
 Perl 6 provides common set operators, which can take C<SetHash>es (or any other