From e6994405903926925d8ffb224c72e19a82343e9e Mon Sep 17 00:00:00 2001
From: Gleefre <varedif.a.s@gmail.com>
Date: Fri, 30 Jun 2023 23:26:42 +0200
Subject: [PATCH] Reference to DEFINED-FUN is not necessarily constant (fixes
 lp#1653370).

---
 src/compiler/ir1opt.lisp | 2 --
 1 file changed, 2 deletions(-)

diff --git a/src/compiler/ir1opt.lisp b/src/compiler/ir1opt.lisp
index fd2c4ce28..410200b2b 100644
--- a/src/compiler/ir1opt.lisp
+++ b/src/compiler/ir1opt.lisp
@@ -2026,8 +2026,6 @@
       ((or constant functional) t)
       (lambda-var
        (null (lambda-var-sets leaf)))
-      (defined-fun
-       (not (eq (defined-fun-inlinep leaf) 'notinline)))
       (global-var
        (case (global-var-kind leaf)
          (:global-function
-- 
2.37.2