ocaml/test/Moretest/warnings.ml

45 lines
231 B
OCaml
Raw Normal View History

(* C *)
let foo = ( *);;
(* F *)
let f x y = x;;
f 1; f 1;;
(* M *)
(* duh *)
(* P *)
let 1 = 1;;
(* S *)
1; 1;;
(* U *)
match 1 with
| 1 -> ()
| 1 -> ()
| _ -> ()
;;
(* V *)
(* re-duh *)
(* X *)
(* re-re *)