summaryrefslogtreecommitdiffstats
path: root/otherlibs/win32unix/windir.c
diff options
context:
space:
mode:
authorXavier Leroy <xavier.leroy@inria.fr>1997-03-11 10:38:06 +0000
committerXavier Leroy <xavier.leroy@inria.fr>1997-03-11 10:38:06 +0000
commit72157b51f73275f15aa43a3c5f6cd1e0038bca52 (patch)
tree0f60ec74f6b53c188bab857e03eec445421f82b1 /otherlibs/win32unix/windir.c
parentf13ce4a3df625f62b80517cd8d075b419b5083b4 (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.c4
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);