Loading posix/wrappers.lisp +8 −2 Original line number Diff line number Diff line Loading @@ -59,7 +59,10 @@ (length ("off_t" off))) #-windows (defwrapper "mmap" ("void*" (errno-wrapper :pointer)) (defwrapper "mmap" ("void*" (errno-wrapper :int :error-predicate (lambda (p) (= p map-failed)) :return-filter make-pointer)) (start :pointer) (length ("size_t" size)) (prot :int) Loading @@ -68,7 +71,10 @@ (offset ("off_t" off))) #+linux (defwrapper "mremap" ("void*" (errno-wrapper :pointer)) (defwrapper "mremap" ("void*" (errno-wrapper :int :error-predicate (lambda (p) (= p map-failed)) :return-filter make-pointer)) (old-address :pointer) (old-size ("size_t" size)) (new-size ("size_t" size)) Loading Loading
posix/wrappers.lisp +8 −2 Original line number Diff line number Diff line Loading @@ -59,7 +59,10 @@ (length ("off_t" off))) #-windows (defwrapper "mmap" ("void*" (errno-wrapper :pointer)) (defwrapper "mmap" ("void*" (errno-wrapper :int :error-predicate (lambda (p) (= p map-failed)) :return-filter make-pointer)) (start :pointer) (length ("size_t" size)) (prot :int) Loading @@ -68,7 +71,10 @@ (offset ("off_t" off))) #+linux (defwrapper "mremap" ("void*" (errno-wrapper :pointer)) (defwrapper "mremap" ("void*" (errno-wrapper :int :error-predicate (lambda (p) (= p map-failed)) :return-filter make-pointer)) (old-address :pointer) (old-size ("size_t" size)) (new-size ("size_t" size)) Loading