diff --git a/src/lsp/ffi.lsp b/src/lsp/ffi.lsp
index 93791ac4f..3f50e3caf 100644
--- a/src/lsp/ffi.lsp
+++ b/src/lsp/ffi.lsp
@@ -335,7 +335,7 @@ Returns the address as an integer of a pointer."
 Returns the object to which a pointer points."
   ;; FIXME! No checking!
   (setf ftype (%convert-to-ffi-type ftype))
-  (cond ((foreign-elt-type-p type)
+  (cond ((foreign-elt-type-p ftype)
          (si::foreign-data-ref-elt ptr 0 ftype))
         ((atom ftype)
          (error "Unknown foreign primitive type: ~A" ftype))