--- a/Dictionary.st	Wed Jul 31 22:58:44 2019 +0200
+++ b/Dictionary.st	Wed Jul 31 23:15:14 2019 +0200
@@ -1,5 +1,3 @@
-"{ Encoding: utf8 }"
-
 "
  COPYRIGHT (c) 1991 by Claus Gittinger
 	      All Rights Reserved
@@ -882,6 +880,15 @@
         ]
     ].
     ^ keySet
+!
+
+newAt:key put:value
+    "For compatibility with SmallDictionaryWithNElements.
+     Same operation as at:put:, 
+     with the possibiliy of returning a new instance if there was a need to grow"
+
+    self at:key put:value.
+    ^ self
 ! !
 
 !Dictionary methodsFor:'adding & removing'!
@@ -2251,7 +2258,6 @@
 ! !
 
 
-
 !Dictionary methodsFor:'printing & storing'!
 
 printElementsDo:aBlock