小编cod*_*ife的帖子

我想创建一个while循环来连接xs列表中的字符串,直到找到一个空字符串,但似乎我们既没有机会增加Int也没有创建while循环.

所以这看起来像是Haskell的伪代码,但我怎样才能真正实现我的解决方案呢？

prt :: String -> [String] -> Int -> String
prt str xs x = do
         while((xs !! (x)) /= "")
         str = str ++ (xs !! (x++))