remove unnecessary cause of failure in parser, qualify call to op_/3 in builtins.pl

crates/prolog_parser/src/parser.rs

@@ -469,10 +469,6 @@ impl<'a, R: Read> Parser<'a, R> {
                     return false;
                 }
             }
-
-            if arity >= 2 && is_prefix!(self.stack[idx].spec) && self.stack[idx].priority > 0 {
-                return false;
-            }
         } else {
             return false;
         }

src/lib/builtins.pl

@@ -1170,7 +1170,7 @@ op(Priority, OpSpec, Op) :-
     ;  valid_op(Op), op_priority(Priority), op_specifier(OpSpec) ->
        '$op'(Priority, OpSpec, Op)
     ;  list_of_op_atoms(Op), op_priority(Priority), op_specifier(OpSpec) ->
-       lists:maplist(op_(Priority, OpSpec), Op),
+       lists:maplist(builtins:op_(Priority, OpSpec), Op),
        !
     ;  throw(error(type_error(list, Op), op/3)) % 8.14.3.3 f)
     ).