Haskellのデバッグ、私は例えば、すべてのコールで、Haskellではリストか何かを印刷することができますどのように

Question

：デバッグのため

funct a list = funct (a + 1) (a : list) 
       print list here ??????? but how ? 

Answer 1

、

import Debug.Trace 

funct :: Integer -> [Integer] -> Bool 
funct a list = trace (show list) $ funct (a + 1) (a : list) 

trace :: String -> a -> aがあります。これは、フードの下でunsafePerformIOを使用するので、デバッグのためには悪いです。です。

遅延評価のため、デバッグ出力が驚くべき順序で表示され、プログラムが通常生成する出力がインターリーブされることに注意してください。

module TraceIt where 

import Debug.Trace 

funct :: Integer -> [Integer] -> Bool 
funct 10 list = null list 
funct a list = trace (show list) $ funct (a + 1) (a : list) 

で

予想通り、私は

*TraceIt> funct 1 [] 
[] 
[1] 
[2,1] 
[3,2,1] 
[4,3,2,1] 
[5,4,3,2,1] 
[6,5,4,3,2,1] 
[7,6,5,4,3,2,1] 
[8,7,6,5,4,3,2,1] 
False 

を取得します。

Answer 2

ダニエルフィッシャーと同じですが、unsafePerformIOのみとなります。

> import System.IO.Unsafe 
> let funct a list = unsafePerformIO $ do { print list; return $ funct (a + 1) (a : list) } 

similar questionを見てみましょうあなたはunsafePerformIOを使用するときには本当に何が起こっているかを説明します。