diff --git a/packages/fcl-extra/src/unix/daemonapp.inc b/packages/fcl-extra/src/unix/daemonapp.inc
index 2412bfc3a9..3022ef44a2 100644
--- a/packages/fcl-extra/src/unix/daemonapp.inc
+++ b/packages/fcl-extra/src/unix/daemonapp.inc
@@ -157,7 +157,7 @@ begin
   Main(0,Nil);
 end;
 
-procedure TDaemonController.Main(Argc: DWord; Args: PPAnsiChar);
+procedure TDaemonController.Main(Argc: DWord; Args: PPChar);
 
 Var
   T : TThread;