diff --git a/packages/fcl-hash/src/fphashutils.pp b/packages/fcl-hash/src/fphashutils.pp
index ba50b23333..d90bb48968 100644
--- a/packages/fcl-hash/src/fphashutils.pp
+++ b/packages/fcl-hash/src/fphashutils.pp
@@ -16,7 +16,7 @@ unit fphashutils;
 interface
 
 uses
-  Classes, SysUtils, ECC;
+  Classes, SysUtils, fpECC;
 
 Procedure BytesFromVar(out aBytes : TBytes; aLocation : Pointer; aSize : Integer);
 Function BytesFromVar(aLocation : Pointer; aSize : Integer) : TBytes;