Commit ad8b8880 authored by Stelian Ionescu's avatar Stelian Ionescu
Browse files

Fix wrapping of mmap() and mremap(): the correct type for treating a pointer...

Fix wrapping of mmap() and mremap(): the correct type for treating a pointer as integer is :long not :int.
Thanks to John Fremlin.
parent 725fd246
Loading
Loading
Loading
Loading
+2 −2
Original line number Diff line number Diff line
@@ -60,7 +60,7 @@

#-windows
(defwrapper "mmap" ("void*" (errno-wrapper
                             :int
                             :long
                             :error-predicate (lambda (p) (= p map-failed))
                             :return-filter make-pointer))
  (start :pointer)
@@ -72,7 +72,7 @@

#+linux
(defwrapper "mremap" ("void*" (errno-wrapper
                               :int
                               :long
                               :error-predicate (lambda (p) (= p map-failed))
                               :return-filter make-pointer))
  (old-address :pointer)