passage aux labels legers

git-svn-id: http://caml.inria.fr/svn/ocaml/trunk@3024 f963ae5c-01c2-4b8c-9fe0-0dff7051ff02

1 files changed, 2 insertions, 2 deletions

diff --git a/stdlib/filename.mli b/stdlib/filename.mli
index 1be8239a30..47b00538df 100644
--- a/stdlib/filename.mli
+++ b/stdlib/filename.mli
@@ -32,10 +32,10 @@ val is_implicit : string -> bool
            with an explicit reference to the current directory ([./] or
            [../] in Unix), [false] if it starts with an explicit reference
            to the root directory or the current directory. *)
-val check_suffix : string -> suff:string -> bool
+val check_suffix : string -> string -> bool
         (* [check_suffix name suff] returns [true] if the filename [name]
            ends with the suffix [suff]. *)
-val chop_suffix : string -> suff:string -> string
+val chop_suffix : string -> string -> string
         (* [chop_suffix name suff] removes the suffix [suff] from
            the filename [name]. The behavior is undefined if [name] does not
            end with the suffix [suff]. *)