Login

Ben / Nujel

Overview Code Talk CI Settings
7 branches 0 tags
Ben (X13/Arch) Removed args from NFunc 4877ff9 9 days ago 1259 Commits
nujel / benchmark / for / ocaml.ml
Raw
application/octet-stream • 127 B • 7 lines 
let rec testRun = fun i r ->
  if i < 10000000 then
    testRun (1+i) (r+i)
  else
    r;;

Printf.printf "%d" (testRun 0 0);;