ppDelaysOrParams :: Either [Expression] [Parameter] -> Doc
ppDelaysOrParams (Left [])  = empty
ppDelaysOrParams :: Either [Expression] [Parameter] -> Doc
ppDelaysOrParams (Left [])  = empty
ppDelaysOrParams (Left [])  = empty