pascalcoin_daemon.pp 398 B

1234567891011121314151617181920212223
  1. program pascalcoin_daemon;
  2. {$mode objfpc}{$H+}
  3. {$define usecthreads}
  4. {$apptype gui}
  5. uses
  6. {$IFDEF UNIX}{$IFDEF UseCThreads}
  7. cthreads,
  8. {$ENDIF}{$ENDIF}
  9. sysutils,
  10. Classes, daemonapp,
  11. UCrypto, upcdaemon;
  12. begin
  13. Application.Title:='PascalCoin Daemon application';
  14. RegisterDaemonClass(TPCDaemon);
  15. RegisterDaemonMapper(TPCDaemonMapper);
  16. TCrypto.InitCrypto;
  17. Application.Run;
  18. end.