Concatenate to a list of string another string

Question

The below code gives back a list of String but I want it work on multiple cases. The problem is that I can't create the same exact result with recursion. The program gives back the following result:

replaceTabs 6 ["\thello world"]

=> ["      hello world"]

Now this should work with a longer list like:

replaceTabs 6 ["asd dsa","\thello world"]

    => ["asd dsa","      hello world"]

Simple concat doesn't work, because it will give back undefined pattern.

replaceTab' :: Int -> [[Char]] -> [Char]
replaceTab' n [[x]] =
 if x == '\t' then replicate n ' '
 else [x]

replaceTabs :: Int -> [String]-> [String]
replaceTabs n [""] = [""]
replaceTabs n (x:xs) = (return . concat $ [replaceTab' n [a] | a <- (map (:[]) (x))])

Jorge Adriano Branco Aires · Accepted Answer · 2018-11-24 17:43:12Z

3

This

replaceTab' :: Int -> [[Char]] -> [Char]

is the same as,

replaceTab' :: Int -> [String] -> String

What you should focus on is implementing a function,

replaceTab :: Int -> String -> String

which "fixes" a single String. Then replaceTabs is simply,

replaceTabs :: Int -> [String] -> [String]
replaceTabs n = map (replaceTab n)

answered Nov 24, 2018 at 17:43

Jorge Adriano Branco Aires

2,30014 silver badges24 bronze badges

Sign up to request clarification or add additional context in comments.

Collectives™ on Stack Overflow

Concatenate to a list of string another string

1 Answer 1

Comments

Your Answer

Hot Network Questions

Collectives™ on Stack Overflow

1 Answer 1

Comments

Your Answer

Sign up or log in

Post as a guest

Related