~cypheon/rapid

5f2e5d9ba7bc4e401db05a144a8297f5e42b0c48 — Johann Rudloff 1 year, 9 months ago 5426d91
Fix showSep implementation in Data.Utils
1 files changed, 1 insertions(+), 1 deletions(-)

M src/Data/Utils.idr
M src/Data/Utils.idr => src/Data/Utils.idr +1 -1
@@ 72,4 72,4 @@ showSep sep xs = showSepGo True xs "" where
  showSepGo : Bool -> List String -> String -> String
  showSepGo first [] acc = acc
  showSepGo first (x::xs) acc = if first then showSepGo False xs (acc ++ x)
                                         else showSepGo False xs (acc ++ " " ++ x)
                                         else showSepGo False xs (acc ++ sep ++ x)