fork download 
  1. import System.IO.Unsafe
  2.  
  3. f :: a -> a
  4. f x = unsafePerformIO $ do
  5. 	print "whatever"
  6. 	return x
  7.  
  8. main = print $ f 42
Success #stdin #stdout 0s 4700KB
comments (?)
stdin 
Standard input is empty
stdout 
"whatever"
42
https://ideone.com/Ymg9DN
language:
Haskell (ghc 8.4.4)
created:
8 years ago
visibility:
secret

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!