Index: tests/natools-smaz_tests.adb
==================================================================
--- tests/natools-smaz_tests.adb
+++ tests/natools-smaz_tests.adb
@@ -308,11 +308,11 @@
                elsif U in 'A' .. 'Z' and then V in 'a' .. 'z' then
                   return 2708 + Rank (U) * 26 + Rank (V);
                elsif U in 'A' .. 'Z' and then V in 'A' .. 'Z' then
                   return 3384 + Rank (U) * 26 + Rank (V);
                else
-                  return 4095;
+                  return 4096;
                end if;
             end;
 
          when 3 =>
             declare
@@ -324,15 +324,15 @@
                  and then V in '0' .. '9'
                  and then W in '0' .. '9'
                then
                   return 356 + Rank (U) * 100 + Rank (V) * 10 + Rank (W);
                else
-                  return 4095;
+                  return 4096;
                end if;
             end;
          when others =>
-            return 4095;
+            return 4096;
       end case;
    end Dictionary_4096_Hash;
 
 
    procedure Generic_Roundtrip_Test