compatibility with SWI generated error messages.

2011-02-11 19:00:32 +00:00 · 2011-02-11 19:00:32 +00:00 · 1da3cc8b5c
parent 10f84228bc
commit 1da3cc8b5c
1 changed files with 3 additions and 0 deletions
--- a/pl/messages.yap
+++ b/pl/messages.yap
@ -69,6 +69,9 @@ generate_message(debug) --> !,
 	[ debug ].
 generate_message(trace) --> !,
 	[ trace ].
+generate_message(error(Error,context(Cause,Extra))) -->
+	system_message(error(Error,Cause)),
+	stack_dump(error(Error,context(Cause,Extra))).
 generate_message(M) -->
 	system_message(M),
 	stack_dump(M).