correct variable_names culprit
This commit is contained in:
@@ -1,6 +1,6 @@
|
|||||||
[package]
|
[package]
|
||||||
name = "scryer-prolog"
|
name = "scryer-prolog"
|
||||||
version = "0.8.79"
|
version = "0.8.80"
|
||||||
authors = ["Mark Thom <markjordanthom@gmail.com>"]
|
authors = ["Mark Thom <markjordanthom@gmail.com>"]
|
||||||
repository = "https://github.com/mthom/scryer-prolog"
|
repository = "https://github.com/mthom/scryer-prolog"
|
||||||
description = "A modern Prolog implementation written mostly in Rust."
|
description = "A modern Prolog implementation written mostly in Rust."
|
||||||
|
|||||||
@@ -250,9 +250,9 @@ must_be_var_names_list_([VarName | VarNames]) :-
|
|||||||
( nonvar(VarName), VarName = (Atom = _) ->
|
( nonvar(VarName), VarName = (Atom = _) ->
|
||||||
( atom(Atom) -> must_be_var_names_list_(VarNames)
|
( atom(Atom) -> must_be_var_names_list_(VarNames)
|
||||||
; var(Atom) -> throw(error(instantiation_error, write_term/2))
|
; var(Atom) -> throw(error(instantiation_error, write_term/2))
|
||||||
; throw(error(domain_error(write_options, variable_names(VarName)), write_term/2))
|
; throw(error(domain_error(write_options, variable_names([VarName | VarNames])), write_term/2))
|
||||||
)
|
)
|
||||||
; throw(error(domain_error(write_options, variable_names(VarName)), write_term/2))
|
; throw(error(domain_error(write_options, variable_names([VarName | VarNames])), write_term/2))
|
||||||
).
|
).
|
||||||
|
|
||||||
write_term(_, Options) :-
|
write_term(_, Options) :-
|
||||||
|
|||||||
Reference in New Issue
Block a user