1% remove annoying ellipsis behavior
    2:- set_prolog_flag(answer_write_options,
    3		   [	quoted(true),
    4			portray(true),
    5			attributes(portray)
    6		   ]).
    7:- set_prolog_flag(debugger_write_options,
    8		   [	quoted(true),
    9			portray(true),
   10			attributes(portray)
   11		   ]).
   12
   13% get stack traces in exceptions
   14:- use_module(library(prolog_stack)).
   15:- dynamic prolog_stack:stack_guard/1.
   16:- multifile prolog_stack:stack_guard/1.
   17prolog_stack:stack_guard(_)