summaryrefslogtreecommitdiffstats
path: root/otherlibs/unix/lseek.c
diff options
context:
space:
mode:
Diffstat (limited to 'otherlibs/unix/lseek.c')
-rw-r--r--otherlibs/unix/lseek.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/otherlibs/unix/lseek.c b/otherlibs/unix/lseek.c
index 05d6d2422..4a34787f7 100644
--- a/otherlibs/unix/lseek.c
+++ b/otherlibs/unix/lseek.c
@@ -18,7 +18,7 @@ value unix_lseek(fd, ofs, cmd) /* ML */
{
long ret;
ret = lseek(Int_val(fd), Long_val(ofs),
- seek_command_table[Tag_val(cmd)]);
+ seek_command_table[Int_val(cmd)]);
if (ret == -1) uerror("lseek", Nothing);
return Val_long(ret);
}