fix copy_partial_string bug (#572)

This commit is contained in:
Mark Thom
2020-06-16 18:47:39 -06:00
parent 0f017339b7
commit 53f99ca434
2 changed files with 5 additions and 5 deletions

View File

@@ -66,7 +66,7 @@
% p_trie_arity_univ(+Term,-FunctorData,-ArgumentsList).
p_trie_arity_univ(Term,functor_data(Name,Arity),Arguments) :-
( var(Term) ->
Name = var,
Name = Term,
Arity = 0,
Arguments = []
; Term =.. [Name|Arguments],