From a2586e865aaa9506df91ebe49dbf6292a6c239ba Mon Sep 17 00:00:00 2001 From: Jon Doe Date: Mon, 14 Sep 2020 17:17:43 +0200 Subject: [PATCH] constructors --- src/GypsFulvus.hs | 2 +- src/GypsFulvus/PluginStuff.hs | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) diff --git a/src/GypsFulvus.hs b/src/GypsFulvus.hs index e4143a1..4e53be6 100644 --- a/src/GypsFulvus.hs +++ b/src/GypsFulvus.hs @@ -1,4 +1,4 @@ -module GypsFulvus(execMain, Manhole, Sewage, InitStatus(..)) where +module GypsFulvus(execMain, Manhole(..), Sewage(..), InitStatus(..)) where import Control.Concurrent.STM (atomically, retry) import Control.Concurrent.STM.TMVar import Control.Concurrent.STM.TChan diff --git a/src/GypsFulvus/PluginStuff.hs b/src/GypsFulvus/PluginStuff.hs index bbdac3a..5691278 100644 --- a/src/GypsFulvus/PluginStuff.hs +++ b/src/GypsFulvus/PluginStuff.hs @@ -1,4 +1,4 @@ -module GypsFulvus.PluginStuff(loadCommsPlugins, Sewage, Manhole, InitStatus(..)) where +module GypsFulvus.PluginStuff(loadCommsPlugins, Sewage(..), Manhole(..), InitStatus(..)) where import Control.Monad import System.Directory import System.Plugins.Make