aboutsummaryrefslogtreecommitdiff
path: root/qklib/infix/rule-set.scm
diff options
context:
space:
mode:
authorMasaya Tojo <masaya@tojo.tokyo>2024-09-12 17:24:15 +0900
committerMasaya Tojo <masaya@tojo.tokyo>2024-09-12 17:24:15 +0900
commit172d403016f959549c7de8a9e257c6324af3b9e9 (patch)
treec9803945592b0db159d93924a743472b5696de40 /qklib/infix/rule-set.scm
parent0ae419a6fce825b093c7c26405bd680ab7a0d977 (diff)
Fix prefix procedure interface
Diffstat (limited to 'qklib/infix/rule-set.scm')
-rw-r--r--qklib/infix/rule-set.scm2
1 files changed, 1 insertions, 1 deletions
diff --git a/qklib/infix/rule-set.scm b/qklib/infix/rule-set.scm
index 96f08cc..1189bca 100644
--- a/qklib/infix/rule-set.scm
+++ b/qklib/infix/rule-set.scm
@@ -157,7 +157,7 @@
((binary-only?)
(make-prefix binary-only? #f #f))
((binary-only? symbol)
- (make-prefix binary-only? symbol #t))))
+ (make-prefix binary-only? #t symbol))))
(define-record-type <identity>
(make-identity value inv? unary?)