Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
Browse files

ecl: si:find-foreign-symbol expects a base-string, coerce it.

  • Loading branch information...
commit 19cc0b7b1c3cb8da317a50d3d31c62363d9ee202 1 parent 4888533
@stassats stassats authored luismbo committed
Showing with 2 additions and 1 deletion.
  1. +2 −1  src/cffi-ecl.lisp
View
3  src/cffi-ecl.lisp
@@ -415,5 +415,6 @@ WITH-POINTER-TO-VECTOR-DATA."
"Returns a pointer to a foreign symbol NAME."
(declare (ignore library))
(handler-case
- (si:find-foreign-symbol name :default :pointer-void 0)
+ (si:find-foreign-symbol (coerce name 'base-string)
+ :default :pointer-void 0)
(error (c) nil)))
Please sign in to comment.
Something went wrong with that request. Please try again.