From a2af2fb541e57f6150cdc28e2119e375e7bb4070 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Daniel=20Kochma=C5=84ski?= <daniel@turtleware.eu>
Date: Sat, 12 Mar 2016 09:49:42 +0100
Subject: [PATCH] ffi: another typo

 (apparently the last one)
---
 src/lsp/ffi.lsp | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/lsp/ffi.lsp b/src/lsp/ffi.lsp
index 3f50e3caf..76e4c53f2 100644
--- a/src/lsp/ffi.lsp
+++ b/src/lsp/ffi.lsp
@@ -830,7 +830,7 @@ the defined Lisp function and RESULT-TYPE is its return type."
   (let ((args (mapcar #'(lambda (x) (gensym)) arg-types)))
   `(defun ,name ,args
      (c-inline ,args ,arg-types ,result-type
-               ,C-expr :one-liner t))))
+               ,c-expression :one-liner t))))
 
 (defmacro defentry (name arg-types c-name &key no-interrupts)
   "Syntax: (defentry name arg-types (result-type function-name)