ppItem (AlwaysItem stmt)
  = char '\n' <>  fsep [ text "always", nest 2 (ppStatement stmt) ]
ppItem (AlwaysItem stmt)
  = char '\n' <>  fsep [ text "always", nest 2 (ppStatement stmt) ]
ppItem (AlwaysItem stmt)
  = char '\n' <>  fsep [ text "always", nest 2 (ppStatement stmt) ]