--------------------------------------------------------------------------------
-- some common things
vppr
  :: Pretty a
  => [a] -> Doc
vppr = foldr ((</>) . ppr) empty
vppr
  :: Pretty a
  => [a] -> Doc
vppr = foldr ((</>) . ppr) empty
vppr = foldr ((</>) . ppr) empty