rishi/scryer-prolog
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

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

Browse Source
This commit is contained in:
Mark Thom
2021-02-17 11:56:58 -07:00
parent 00bf39204d
commit f9b98f97b6
2 changed files with 1 additions and 5 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
crates/prolog_parser/src/parser.rs
View File

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

2
src/lib/builtins.pl
View File

@@ -1170,7 +1170,7 @@ op(Priority, OpSpec, Op) :-
; valid_op(Op), op_priority(Priority), op_specifier(OpSpec) -> ; valid_op(Op), op_priority(Priority), op_specifier(OpSpec) ->
'$op'(Priority, OpSpec, Op) '$op'(Priority, OpSpec, Op)
; list_of_op_atoms(Op), op_priority(Priority), op_specifier(OpSpec) -> ; 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) ; throw(error(type_error(list, Op), op/3)) % 8.14.3.3 f)
). ).