`write_term/2` issue

[notoria]

:- op(1105, xfy, '|').
?- T = (!|"!"), Os = [quoted(true),ignore_ops(false)], write_term(T, Os), nl, false.
!,!
   false.
?-

Expected: !|[!].

[UWN]

This has nothing to do with partial strings:

?- T = ([]|[1,2]), Os = [quoted(true),ignore_ops(false)], write_term(T, Os), nl, false.
[],1,2   % unexpected
   false.

Or, as a quad:

?- T = ([]|[1,2]), Os = [quoted(true),ignore_ops(false)], write_term(T, Os), nl, false.
   outputs("[],1,2\n"), false, unexpected.
   outputs("[]|[1,2]\n"), false. % expected, but not found