fork download
  1. let id = Some 42;;
  2.  
  3. match id with
  4. | Some x when x = 10 -> Printf.printf "%d" x
  5. | None -> Printf.printf "hm"
  6. | _ -> Printf.printf "kappa"
Success #stdin #stdout 0s 4240KB
stdin
Standard input is empty
stdout
kappa