diff options
| author | Pierre Boutillier | 2014-01-13 13:23:45 +0100 |
|---|---|---|
| committer | Pierre Boutillier | 2014-01-13 15:21:44 +0100 |
| commit | 2bfa94975ecc58d35637689ef2fd4473e8126c2e (patch) | |
| tree | d9b6544a5b068fbb60812e5d643e6bdc52620b6d /tools/coqdep.ml | |
| parent | e20e73300be869696264f8269c47c0ff92316c26 (diff) | |
Declared ML Module are not uncapitalized/capitalized/uncapitalized/...
The exact filename has to be written. This is coherent with the RefMan.
Diffstat (limited to 'tools/coqdep.ml')
| -rw-r--r-- | tools/coqdep.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/tools/coqdep.ml b/tools/coqdep.ml index 578f473368..f083a59cfb 100644 --- a/tools/coqdep.ml +++ b/tools/coqdep.ml @@ -121,7 +121,7 @@ let traite_Declare f = let s' = basename_noext s in (match search_ml_known s with | Some mldir when not (List.mem s' !decl_list) -> - let fullname = file_name (String.uncapitalize s') mldir in + let fullname = file_name s' mldir in let depl = mL_dep_list s (fullname ^ ".ml") in treat depl; decl_list := s :: !decl_list |