diff --git a/USolver.pas b/USolver.pas
index 43b165c..53aea0d 100644
--- a/USolver.pas
+++ b/USolver.pas
@@ -62,9 +62,8 @@ type
   { TSolverEngine }
 
   TSolverEngine = class
-  private
-    procedure ProcessData(constref ASolver: ISolver);
   public
+    procedure ProcessData(constref ASolver: ISolver);
     procedure Run(constref ASolver: ISolver);
     procedure RunAndFree(constref ASolver: ISolver);
   end;