Skip to content
Snippets Groups Projects
Commit 5c03bcea authored by Iustin Pop's avatar Iustin Pop
Browse files

Fix lint issue in Test/…/THH.hs


Sorry!

Signed-off-by: default avatarIustin Pop <iustin@google.com>
Reviewed-by: default avatarMichael Hanselmann <hansmi@google.com>
parent bca39f5c
No related branches found
No related tags found
No related merge requests found
......@@ -46,7 +46,7 @@ import Test.Ganeti.TestCommon
-- | Type used to test optional field implementation. Equivalent to
-- @data TestObj = TestObj { tobjA :: Maybe Int, tobjB :: Maybe Int
-- }@.
$(buildObject "TestObj" "tobj" $
$(buildObject "TestObj" "tobj"
[ optionalField $ simpleField "a" [t| Int |]
, optionalNullSerField $ simpleField "b" [t| Int |]
])
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment