diff options
Diffstat (limited to 'src/Erebos/Service.hs')
-rw-r--r-- | src/Erebos/Service.hs | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/src/Erebos/Service.hs b/src/Erebos/Service.hs index 9030d04..fefc503 100644 --- a/src/Erebos/Service.hs +++ b/src/Erebos/Service.hs @@ -72,6 +72,9 @@ class ( serviceStorageWatchers :: proxy s -> [SomeStorageWatcher s] serviceStorageWatchers _ = [] + serviceStopServer :: proxy s -> Server -> ServiceGlobalState s -> [ ( Peer, ServiceState s ) ] -> IO () + serviceStopServer _ _ _ _ = return () + data SomeService = forall s. Service s => SomeService (Proxy s) (ServiceAttributes s) |