@@ -37,7 +37,6 @@ import Basics (..)
3737import Maybe (..)
3838import Native.Error
3939import List
40−import String
4140import Native.Utils
4241
4342-- BBlack and NBlack should only be used during the deletion
@@ -144,7 +143,7 @@ will be found.
144143getUnsafe : comparable -> Dict comparable v -> v
145144getUnsafe k t =
146145 case t of
147− RBEmpty LBlack -> Native.Error.raise <| String.concat [ "key ", String.show k, " not found." ]
146+ RBEmpty LBlack -> Native.Error.raise "key not found when using 'getUnsafe'"
148147 RBNode _ k' v l r ->
149148 case Native.Utils.compare k k' of
150149 LT -> getUnsafe k l