mirror of
https://gitlab.com/embeddable-common-lisp/ecl.git
synced 2026-01-02 23:50:56 -08:00
NULL-POINTER-P was already defined in the core
This commit is contained in:
parent
05bb9eccb4
commit
642ff7e6c0
1 changed files with 3 additions and 1 deletions
|
|
@ -28,7 +28,8 @@
|
|||
"WITH-FOREIGN-STRINGS" "ENSURE-CHAR-STORABLE" "DEF-TYPE"
|
||||
"WITH-CSTRING" "CONVERT-TO-CSTRING" "CONVERT-FROM-CSTRING" "FREE-CSTRING"
|
||||
"WITH-CAST-POINTER" "WITH-CSTRINGS"
|
||||
))
|
||||
)
|
||||
(:import-from "SYS" "NULL-POINTER-P"))
|
||||
|
||||
(in-package "FFI")
|
||||
|
||||
|
|
@ -352,6 +353,7 @@
|
|||
:side-effects t
|
||||
:one-liner t))
|
||||
|
||||
#+(OR) ;; Already defined in core
|
||||
(defun null-pointer-p (object)
|
||||
(si::null-pointer-p object))
|
||||
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue