Commits

dafis  committed cf41e49

Adjust default arg

  • Participants
  • Parent commits 407aedc

Comments (0)

Files changed (1)

File tests/benchmarking/fltDisp.hs

     args <- getArgs
     let k = case args of
               (a:_) -> read a
-              _ -> 20000
+              _ -> 200000
     putStr $ wook k