Remove trace error and broken implementation

svn: r15956
This commit is contained in:
Kathy Gray 2009-09-10 14:03:26 +00:00
parent cdd4c47bd6
commit 07b104e939

View File

@ -262,7 +262,7 @@
;; make-error-link: text% check-fail exn src editor -> void
(define (make-error-link text reason exn dest src-editor)
(make-link text reason dest src-editor)
(let ((start (send text get-end-position)))
#;(let ((start (send text get-end-position)))
(send text insert (string-constant test-engine-trace-error))
(send text insert " ")
(when (and src-editor current-rep)