Searched refs:commaIf (Results 1 – 4 of 4) sorted by relevance
376 ss (JSBreak _ JSIdentNone s) = "JSBreak" ++ commaIf (ss s)377 ss (JSBreak _ (JSIdentName _ n) s) = "JSBreak " ++ singleQuote n ++ commaIf (ss s)379 ss (JSContinue _ JSIdentNone s) = "JSContinue" ++ commaIf (ss s)380 ss (JSContinue _ (JSIdentName _ n) s) = "JSContinue " ++ singleQuote n ++ commaIf (ss s)641 commaIf :: String -> String642 commaIf "" = "" function643 commaIf xs = ',' : xs function
374 ss (JSBreak _ JSIdentNone s) = "JSBreak" ++ commaIf (ss s)375 ss (JSBreak _ (JSIdentName _ n) s) = "JSBreak " ++ singleQuote n ++ commaIf (ss s)377 ss (JSContinue _ JSIdentNone s) = "JSContinue" ++ commaIf (ss s)378 ss (JSContinue _ (JSIdentName _ n) s) = "JSContinue " ++ singleQuote n ++ commaIf (ss s)637 commaIf :: String -> String638 commaIf "" = "" function639 commaIf xs = ',' : xs function