Remove unused lexical variable FDEFINITION.

ska80 · Sep 20, 2020 · ef16a09 · ef16a09
1 parent d7ccedd
commit ef16a09
Showing 1 changed file with 3 additions and 4 deletions.
diff --git a/Code/Environment-Clostrum/trucler-methods.lisp b/Code/Environment-Clostrum/trucler-methods.lisp
@@ -62,10 +62,9 @@
                (if (special-operator client environment name)
                    (make-instance 'trucler:special-operator-description
                      :name name)
-                   (let ((fdefinition (fdefinition client environment name)))
-                     (make-instance 'trucler:global-function-description
-                       :name name
-                       :compiler-macro (compiler-macro-function client environment name)))))))
+                   (make-instance 'trucler:global-function-description
+                     :name name
+                     :compiler-macro (compiler-macro-function client environment name))))))
         (t
          (make-instance 'trucler:global-function-description
            :name name