Skip to content
This repository was archived by the owner on Sep 3, 2024. It is now read-only.

Commit 4019f52

Browse files
committed
fix(haddock): remove leading whitespace
1 parent 4b42b60 commit 4019f52

File tree

1 file changed

+2
-3
lines changed
  • src/Control/Distributed/Process/Extras/Internal

1 file changed

+2
-3
lines changed

src/Control/Distributed/Process/Extras/Internal/Types.hs

Lines changed: 2 additions & 3 deletions
Original file line numberDiff line numberDiff line change
@@ -172,7 +172,7 @@ class Resolvable a where
172172
-- | Resolve the reference to a process id, or @Nothing@ if resolution fails
173173
resolve :: a -> Process (Maybe ProcessId)
174174

175-
-- | Unresolvable @Addressable@ Message
175+
-- | Unresolvable @Addressable@ Message
176176
unresolvableMessage :: (Resolvable a) => a -> String
177177
unresolvableMessage = baseAddressableErrorMessage
178178

@@ -183,7 +183,7 @@ instance Resolvable ProcessId where
183183
instance Resolvable String where
184184
resolve = whereis
185185
unresolvableMessage s = "CannotResolveRegisteredName[" ++ s ++ "]"
186-
186+
187187
instance Resolvable (NodeId, String) where
188188
resolve (nid, pname) = whereisRemote nid pname
189189
unresolvableMessage (n, s) =
@@ -273,4 +273,3 @@ data ServerDisconnected = ServerDisconnected !DiedReason
273273
deriving (Typeable, Generic)
274274
instance Binary ServerDisconnected where
275275
instance NFData ServerDisconnected where
276-

0 commit comments

Comments
 (0)