diff options
| -rw-r--r-- | scripts/coqmktop.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/scripts/coqmktop.ml b/scripts/coqmktop.ml index 8e80e6dcb..34afd2200 100644 --- a/scripts/coqmktop.ml +++ b/scripts/coqmktop.ml @@ -83,7 +83,7 @@ let native_suffix f = let rem_ext_regexpr = Str.regexp "\(.*\)\.\(cm..?\|ml\)" let module_of_file name = - let s = Str.replace_first rem_ext_regexpr "\1" (Filename.basename name) in + let s = Str.replace_first rem_ext_regexpr "\\1" (Filename.basename name) in String.capitalize s (* Build the list of files to link and the list of modules names *) |