From 504f136d12276955bf62fca7ad48fce681fa5b10 Mon Sep 17 00:00:00 2001 From: Stelian Ionescu Date: Sat, 24 Jan 2009 01:40:24 +0100 Subject: [PATCH] Use the 64bit versions of OPEN and CREAT. --- syscalls/ffi-functions-unix.lisp | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/syscalls/ffi-functions-unix.lisp b/syscalls/ffi-functions-unix.lisp index 3b80938..3530849 100644 --- a/syscalls/ffi-functions-unix.lisp +++ b/syscalls/ffi-functions-unix.lisp @@ -112,7 +112,7 @@ The two memory areas may overlap." ;;; Files ;;;------------------------------------------------------------------------- -(defsyscall (%%sys-open "open") +(defsyscall (%%sys-open (#+linux "open64" "open")) (:int :restart t) (path filename-designator) (flags :int) @@ -125,7 +125,7 @@ The two memory areas may overlap." \(default value is *DEFAULT-OPEN-MODE* - #o666)." (%%sys-open path flags mode)) -(defsyscall (%sys-creat "creat") +(defsyscall (%sys-creat (#+linux "creat64" "creat")) (:int :restart t) "Create file PATH with permissions MODE and return the new FD." (path filename-designator) -- 2.11.4.GIT