Guest User

Untitled

a guest
Feb 18th, 2018
78
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.20 KB | None | 0 0
  1. import Debug.Trace
  2.  
  3. itIsOK :: Show a => a -> String
  4. itIsOK a | trace ("hoge " ++ show a) False = undefined -- <- debug codes
  5. itIsOK a = (show a) ++ " is OK"
  6.  
  7. main :: IO ()
  8. main = print $ itIsOK "Haskell"
Add Comment
Please, Sign In to add comment