Отслеживание истории в ghci

Question

Как работает управление историей в GHCI или других REPLs на основе Haskell? Поскольку Haskell - чистый язык, я предполагаю, что он реализован с использованием монады, возможно, state monad.

Просьба отметить, что я новичок в Haskell, поэтому, пожалуйста, предоставьте подробное объяснение, а не просто ссылку на источник.

Answer 1

Это упрощенный пример того, как программа может сохранять историю команд, введенных пользователем. Это в основном имеет ту же структуру, что и угадывание игра чисел, поэтому, как только вы понимаете, что вы не должны иметь никаких проблем с пониманием этого:

import Control.Monad.State 
import Control.Monad 

shell :: StateT [String] IO() 
shell = forever $ do 
    lift $ putStr "$ " 
    cmd <- lift getLine 
    if cmd == "history" 
    then do hist <- get 
      lift $ forM_ hist $ putStrLn 
    else modify (++ [cmd]) 

main = do putStrLn "Welcome to the history shell." 
      putStrLn "Type 'history' to see your command history." 
      execStateT shell []