[haskell] remove constructor
[haskell] handle null message