correct variable_names culprit

This commit is contained in:
Mark Thom
2019-05-08 19:58:05 -04:00
parent 3f07178312
commit 7fef8a3e86
2 changed files with 3 additions and 3 deletions

View File

@@ -1,6 +1,6 @@
[package]
name = "scryer-prolog"
version = "0.8.79"
version = "0.8.80"
authors = ["Mark Thom <markjordanthom@gmail.com>"]
repository = "https://github.com/mthom/scryer-prolog"
description = "A modern Prolog implementation written mostly in Rust."

View File

@@ -250,9 +250,9 @@ must_be_var_names_list_([VarName | VarNames]) :-
( nonvar(VarName), VarName = (Atom = _) ->
( atom(Atom) -> must_be_var_names_list_(VarNames)
; 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) :-