Permalink
Browse files

fixed docu of GetToken

  • Loading branch information...
1 parent 563acee commit 39eb2f33f2f33007e8071b350359e92c3f4323db Alexander Bernauer committed Jan 5, 2013
Showing with 3 additions and 2 deletions.
  1. +3 −2 src/Gdbmi/Representation.hs
@@ -449,9 +449,10 @@ asList _ = Nothing
-- token {{{1
type Token = Int
-
+
+-- | Return the token of the given object, if existent.
class GetToken a where
- get_token :: a -> Maybe Token -- ^ return the token of the given object, if existent.
+ get_token :: a -> Maybe Token
instance GetToken ResultRecord where
get_token (ResultRecord token _ _) = token

0 comments on commit 39eb2f3

Please sign in to comment.