fork download
copy 
  1. foo = do
  2. 	putStrLn "foo"
  3. 	return 5
  4.  
  5. bar flag d = do
  6. 	putStrLn $ "flag = " ++ show flag
  7. 	if flag
  8. 		then do
  9. 			x <- d
  10. 			putStrLn $ "data = " ++ show x
  11. 		else return ()
  12.  
  13. main = do
  14. 	bar True  foo
  15. 	bar False foo
  16.  
Success #stdin #stdout 0s 4592KB
comments (?)
stdin
copy 
Standard input is empty
stdout
copy 
flag = True
foo
data = 5
flag = False
https://ideone.com/GO7ZhH
language:
Haskell (ghc 8.4.4)
created:
8 years ago
visibility:
public

Share or Embed source code

Discover > Sphere Engine API

The brand new service which powers Ideone!

Discover > IDE Widget

Widget for compiling and running the source code in a web browser!