-- (copied from andy's code in GenVHDL)
-- TODO: get multline working
ppItem (CommentItem msg)
  = vcat [ text "//" <> text m | m <- lines msg ]
ppItem (CommentItem msg)
  = vcat [ text "//" <> text m | m <- lines msg ]
ppItem (CommentItem msg)
  = vcat [ text "//" <> text m | m <- lines msg ]