summaryrefslogtreecommitdiffstats
path: root/otherlibs/unix/ftruncate.c
diff options
context:
space:
mode:
Diffstat (limited to 'otherlibs/unix/ftruncate.c')
-rw-r--r--otherlibs/unix/ftruncate.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/otherlibs/unix/ftruncate.c b/otherlibs/unix/ftruncate.c
index 7dbc957dd..cc9f978c6 100644
--- a/otherlibs/unix/ftruncate.c
+++ b/otherlibs/unix/ftruncate.c
@@ -17,7 +17,7 @@
#ifdef HAS_TRUNCATE
-value unix_ftruncate(value fd, value len) /* ML */
+CAMLprim value unix_ftruncate(value fd, value len)
{
if (ftruncate(Int_val(fd), Long_val(len)) == -1)
uerror("ftruncate", Nothing);
@@ -26,7 +26,7 @@ value unix_ftruncate(value fd, value len) /* ML */
#else
-value unix_ftruncate(value fd, value len)
+CAMLprim value unix_ftruncate(value fd, value len)
{ invalid_argument("ftruncate not implemented"); }
#endif