Haskell paraméter átadás hiba

Haskell paraméter átadás hiba
2006-04-28T11:58:17+02:00
2006-04-28T12:02:46+02:00
2022-07-20T04:30:45+02:00
kXa
hi elakadtam programírás közben. 2 kérdésem lenne.
import IO --charlist, intag?, charlist without tag gettext :: [Char] -> Bool -> [Char] gettext s b = case (s,b) of (('<':l),False) -> gettext l True (('>':l),True) -> gettext l False ((c:l),False) -> c : gettext l False ((c:l),True) -> gettext l True ([],b) -> [] --charlist, intag?, charlist with tag gettag :: [Char] -> Bool -> [Char] gettag s b = case (s,b) of (('<':l),False) -> '<': gettag l True (('>':l),True) -> '>': gettag l False ((c:l),False) -> gettag l False ((c:l),True) -> c : gettag l True ([],b) -> [] -- string intag? good? change:: [Char] -> [Char] change s = case (s) of ('<':l) -> '>' : change l True ('>':l) -> '<': change l True (c:l) -> c : change l False (c:l) -> c : change l True ([]) -> [] opening :: IO Handle opening = do putStr "A HTML file neve: " name <- getLine catch (openFile name ReadMode) (\e -> do putStrLn ("Nem lehet megnyitni: ") opening) main :: IO () main = do x <- opening y <- hGetContents x putStr (gettext y False) putStr (gettag y False) --ez nem megy itt: putStr (change gettag y False)
hogy lehet függvényeket összefűzni?
vagy szekvenciálisan megoldani a vezérlést.
THX a válszokat.
Mutasd a teljes hozzászólást!

  • paraméterátadási gondok vannak vele.

    megpróbáltam egy szekvenciális vezérlést de ez is hibázik:
    import IO todoList :: [IO ()] todoList = [do d <- getChar putChar d, do putChar 'b' putStr "seq2", do c <- getChar putChar c] sequence_ :: [IO ()] -> IO () sequence_ [] = return () sequence_ (a:as) = do a sequence as
    a sequence_ paraméterei nem jók mire kéne állíranom hogy a sequence_-el rámegyek a todoList-ra és meg is csinálja?
    Mutasd a teljes hozzászólást!
abcd