From: Markus Triska <triska@metalevel.at>
Date: Fri, 30 Jun 2023 16:03:21 +0000 (+0200)
Subject: remove unneeded case: only operator definitions should count, not quoting
X-Git-Tag: v0.9.2~101^2
X-Git-Url: https://git.sagredo.dev/?a=commitdiff_plain;h=42282c6e6ec0cff6fc110b0a6be23addc4b11088;p=scryer-prolog.git

remove unneeded case: only operator definitions should count, not quoting
---

diff --git a/src/toplevel.pl b/src/toplevel.pl
index 8a0d44ea..2cfe04f5 100644
--- a/src/toplevel.pl
+++ b/src/toplevel.pl
@@ -213,7 +213,6 @@ needs_bracketing(Value, Op) :-
     arity_specifier(Arity, FSpec),
     (  Arity =:= 0
     ;  EqPrec < FPrec
-    ;  F \== '.', '$quoted_token'(F)
     ;  EqPrec =:= FPrec,
        member(EqSpec, [fx,xfx,yfx])
     ).