annotate etc/editclient.sh @ 5040:3daf9fc57cd4

fixes to test harness to allow backtracing/debugging of failures -------------------- ChangeLog entries follow: -------------------- tests/ChangeLog addition: 2010-02-20 Ben Wing <ben@xemacs.org> * automated/test-harness.el: * automated/test-harness.el (test-harness-bug-expected): New. * automated/test-harness.el (test-harness-unexpected-error-enter-debugger): New. * automated/test-harness.el (test-harness-assertion-failure-enter-debugger): New. * automated/test-harness.el (test-harness-unexpected-error-show-backtrace): New. * automated/test-harness.el (test-harness-assertion-failure-show-backtrace): New. * automated/test-harness.el (test-harness-assertion-failure-do-debug): New. * automated/test-harness.el (test-harness-unexpected-error-do-debug): New. * automated/test-harness.el (test-harness-unexpected-error-condition-handler): New. * automated/test-harness.el (test-harness-error-wrap): New. * automated/test-harness.el (test-harness-from-buffer): New variables that allow a backtrace to be displayed and/or the debugger to be entered when an assertion failure or unexpected error occurs. By default, debugging occurs when interactive and debug-on-error is set, and backtrace-displaying occurs either (a) when stack-trace-on-error is set, or (b) always, when an unexpected error occurs. (However, no backtracing or debugging occurs when a bug is expected.)
author Ben Wing <ben@xemacs.org>
date Sat, 20 Feb 2010 20:04:44 -0600
parents 3ecd8885ac67
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
428
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
1 #!/bin/sh
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
2 if gnuclient -batch -eval t >/dev/null 2>&1; then
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
3 exec gnuclient ${1+"$@"}
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
4 else
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
5 xemacs -unmapped -f gnuserv-start &
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
6 until gnuclient -batch -eval t >/dev/null 2>&1
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
7 do
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
8 sleep 1
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
9 done
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
10 exec gnuclient ${1+"$@"}
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
11 fi
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
12