Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
Browse files

fix groveller by adding symbolicate to alexandria

  • Loading branch information...
commit 89b6cd7932271a2e84f115ac5793d9bea717c903 1 parent 7358554
@attila-lendvai attila-lendvai authored
Showing with 2 additions and 2 deletions.
  1. +1 −1  grovel/grovel.lisp
  2. +1 −1  src/foreign-vars.lisp
View
2  grovel/grovel.lisp
@@ -29,7 +29,7 @@
;;;
(defpackage #:cffi-grovel
- (:use #:common-lisp #:cffi-utils #:alexandria)
+ (:use #:common-lisp #:alexandria)
(:import-from #:cffi-sys #:native-namestring)
(:export
#:grovel-file
View
2  src/foreign-vars.lisp
@@ -58,7 +58,7 @@ returning nil when foreign-name is not found."
(declare (ignore documentation))
(multiple-value-bind (lisp-name foreign-name options)
(parse-name-and-options name-and-options t)
- (let ((fn (format-symbol t "%VAR-ACCESSOR-~A" lisp-name))
+ (let ((fn (symbolicate '#:%var-accessor- lisp-name))
(read-only (getf options :read-only))
(library (getf options :library)))
;; We can't really setf an aggregate type.
Please sign in to comment.
Something went wrong with that request. Please try again.