diff options
author | Xavier Leroy <xavier.leroy@inria.fr> | 1997-03-11 10:38:06 +0000 |
---|---|---|
committer | Xavier Leroy <xavier.leroy@inria.fr> | 1997-03-11 10:38:06 +0000 |
commit | 72157b51f73275f15aa43a3c5f6cd1e0038bca52 (patch) | |
tree | 0f60ec74f6b53c188bab857e03eec445421f82b1 /otherlibs/win32unix/windir.c | |
parent | f13ce4a3df625f62b80517cd8d075b419b5083b4 (diff) |
Marquage des primitives ML (pour le toplevel Windows).
git-svn-id: http://caml.inria.fr/svn/ocaml/trunk@1369 f963ae5c-01c2-4b8c-9fe0-0dff7051ff02
Diffstat (limited to 'otherlibs/win32unix/windir.c')
-rw-r--r-- | otherlibs/win32unix/windir.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/otherlibs/win32unix/windir.c b/otherlibs/win32unix/windir.c index 08f70ed66..2661133b7 100644 --- a/otherlibs/win32unix/windir.c +++ b/otherlibs/win32unix/windir.c @@ -41,7 +41,7 @@ value win_findfirst(name) /* ML */ return v; } -value win_findnext(valh) +value win_findnext(valh) /* ML */ value valh; { int retcode; @@ -52,7 +52,7 @@ value win_findnext(valh) return copy_string(fileinfo.name); } -value win_findclose(valh) +value win_findclose(valh) /* ML */ value valh; { if (_findclose(Int_val(valh)) != 0) uerror("closedir", Nothing); |