append (++) is not commutative

This commit is contained in:
Joshua Clayton 2016-05-04 22:25:00 -04:00
parent 558c4ed2f4
commit dbee79e525

View File

@ -9,7 +9,7 @@ search t = do
results <- ag t
return $ linesMap prefixTerm results
where
prefixTerm = (++ t)
prefixTerm = ((++) t)
linesMap :: (String -> String) -> String -> [String]
linesMap f =