X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Fsoftware%2Fcomponents%2Fng_kernel%2FnCicPp.ml;h=e7cc53a47b8de4030032bd1858afdf63c08584e5;hb=be0ca791abbf1084b7218f2d17ab48462fbb3049;hp=7d7a90dcc9e5933d94650011e5db3dd6b3498031;hpb=2d3d1750a0012ebc45f97d0000c01141623fc634;p=helm.git diff --git a/helm/software/components/ng_kernel/nCicPp.ml b/helm/software/components/ng_kernel/nCicPp.ml index 7d7a90dcc..e7cc53a47 100644 --- a/helm/software/components/ng_kernel/nCicPp.ml +++ b/helm/software/components/ng_kernel/nCicPp.ml @@ -45,7 +45,7 @@ let r2s pp_fix_name r = if pp_fix_name then let _,name,_,_,_ = List.nth fl i in name else - NUri.name_of_uri u ^"("^ string_of_int i ^ ")" + NUri.name_of_uri u (*^"("^ string_of_int i ^ ")"*) | _ -> assert false) with | NCicEnvironment.ObjectNotFound _