fork download
copy 
  1. extractFlag :: String -> [String] -> (Bool, [String])
  2. extractFlag flag args = (flag `elem` args, delete flag args)
  3.  
  4. main :: IO ()
  5. main = do
  6.   args <- getArgs
  7.   (verbose, args) <- pure $ extractFlag "--verbose" args
Compilation error #stdin compilation error #stdout 0s 0KB
comments (?)
stdin
copy 
Standard input is empty
compilation info 
[1 of 1] Compiling Main             ( prog.hs, prog.o )

prog.hs:7:3: error:
    The last statement in a 'do' block must be an expression
      (verbose, args) <- pure $ extractFlag "--verbose" args
  |
7 |   (verbose, args) <- pure $ extractFlag "--verbose" args
  |   ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
stdout
copy 
Standard output is empty
https://ideone.com/Ec2NTQ
language:
Haskell (ghc 8.4.4)
created:
3 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!