anil.recoil.org / unpac-unpac
The unpac monorepo manager self-hosting as a monorepo using unpac
0
fork

Configure Feed

Select the types of activity you want to include in your feed.

Disable name disambiguation for paths without namespace

Florian Angeletti 4b2ccc9e 0740f418

+2 -2
+1 -1
typing/printtyp.ml
··· 435 435 (rewrite_double_underscore_paths !printing_env p) 436 436 437 437 let path ppf p = 438 - !Oprint.out_ident ppf (tree_of_path None p) 438 + !Oprint.out_ident ppf (tree_of_path ~disambiguation:false None p) 439 439 440 440 let string_of_path p = 441 441 Format.asprintf "%a" path p
+1 -1
typing/typecore.ml
··· 1184 1184 if Warnings.is_active (Name_out_of_scope ("",[],false)) then begin 1185 1185 let path_s = 1186 1186 Printtyp.wrap_printing_env ~error:true env 1187 - (fun () -> Printtyp.string_of_path tpath) in 1187 + (fun () -> Format.asprintf "%a" Printtyp.type_path tpath) in 1188 1188 warn lid.loc 1189 1189 (Warnings.Name_out_of_scope (path_s, [Longident.last lid.txt], false)) 1190 1190 end