Macro stepper: made error printing more uniform
svn: r7892
This commit is contained in:
parent
1608a90ab0
commit
f0567df751
|
@ -480,7 +480,7 @@
|
||||||
(protostep-definites step)
|
(protostep-definites step)
|
||||||
(protostep-frontier step))
|
(protostep-frontier step))
|
||||||
(separator step)
|
(separator step)
|
||||||
(send sbview add-text (exn-message (misstep-exn step)))
|
(send sbview add-error-text (exn-message (misstep-exn step)))
|
||||||
(send sbview add-text "\n")
|
(send sbview add-text "\n")
|
||||||
(when (exn:fail:syntax? (misstep-exn step))
|
(when (exn:fail:syntax? (misstep-exn step))
|
||||||
(for-each (lambda (e) (send sbview add-syntax e
|
(for-each (lambda (e) (send sbview add-syntax e
|
||||||
|
|
Loading…
Reference in New Issue
Block a user