From 74ddca99c649f2f8c203582a9b82bddf64fb6b52 Mon Sep 17 00:00:00 2001 From: Pierre-Marie Pédrot Date: Tue, 22 Apr 2014 15:31:12 +0200 Subject: Removing dead code, thanks to new OCaml warnings and a bit of scripting. --- kernel/mod_subst.ml | 1 - 1 file changed, 1 deletion(-) (limited to 'kernel/mod_subst.ml') diff --git a/kernel/mod_subst.ml b/kernel/mod_subst.ml index f0d1aca4d..9589c0656 100644 --- a/kernel/mod_subst.ml +++ b/kernel/mod_subst.ml @@ -38,7 +38,6 @@ module Deltamap = struct let find_mp mp map = MPmap.find mp (fst map) let find_kn kn map = KNmap.find kn (snd map) let mem_mp mp map = MPmap.mem mp (fst map) - let mem_kn kn map = KNmap.mem kn (snd map) let fold_kn f map i = KNmap.fold f (snd map) i let fold fmp fkn (mm,km) i = MPmap.fold fmp mm (KNmap.fold fkn km i) -- cgit v1.2.3