1. camlspotter
  2. ocamlspot

Source

ocamlspot / xident.ml

The branch 'working2' does not exist.
Diff from to

File xident.ml

  • Ignore whitespace
     
 let unsafe_create_with_stamp = Ident_internal.unsafe_create_with_stamp
 
+let format ppf id = Format.pp_print_string ppf (name id)
+
 let parse s =
   let s, pos = Name.parse s in
   let id = unsafe_create_with_stamp s pos in