From d0e2c699e33c5723a2e896d7364e1d33fa600474 Mon Sep 17 00:00:00 2001
From: Pavel Kulyov <kulyov.pavel@gmail.com>
Date: Tue, 22 Sep 2026 23:40:16 +0300
Subject: [PATCH] semen: fix premature negative cases merge hehe

---
 semen.scm | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/semen.scm b/semen.scm
index 1afac55..4b0800e 100644
--- a/semen.scm
+++ b/semen.scm
@@ -296,8 +296,9 @@
   "The `form` must be toplevel.
 Returns #f if the form is not a function, returns the form otherwise"
   (match form
-    ((fn . _) form)
-    ((pub fn . _) form)
+    ((or ('fn . _)
+         ('pub 'fn . _)
+         ('extern 'fn . _)) form)
     (else #f)))
 
 (define (sex-fn-public? fn-form)
-- 
2.52.0