formatStmt (Uncall id args _) =
  text "uncall" <+> formatIdent id <> parens (commasep $ map formatIdent args)
formatStmt (Uncall id args _) =
  text "uncall" <+> formatIdent id <> parens (commasep $ map formatIdent args)
formatStmt (Uncall id args _) =
  text "uncall" <+> formatIdent id <> parens (commasep $ map formatIdent args)