slightly faster hashtable, and slightly nicer hashtable interface

[d2df-sdl.git] / src / shared / exoma.pas

diff --git a/src/shared/exoma.pas b/src/shared/exoma.pas
index 1931dbbee9c973bbbf4840714fbe4fdcda91f8fe..ffa11a91bec8aea9a243163c19731cbd1c98a2e4 100644 (file)
--- a/src/shared/exoma.pas
+++ b/src/shared/exoma.pas
@@ -345,7 +345,7 @@ var
   n: AnsiString;
 begin
   mClass := aklass;
-  mNames := hashNewStrInt();
+  mNames := THashStrInt.Create();
   pi := aklass.ClassInfo;
   pt := GetTypeData(pi);
   GetMem(pl, pt^.PropCount*sizeof(Pointer));