a failed test
or, in other words, make a top-level check-equal? more like a
check-equal? inside a test-suite that runs in verbose mode
(except that a top-level one limits the output to error-print-width
characters, but the one inside a test-suite doesn't seem to do that)
when using text-ui
Or, in other words, try to make these two print similarly:
#lang racket
(require rackunit rackunit/text-ui)
(check-equal? 1 2)
(run-tests (test-suite "name" (check-equal? 1 2)))
To avoid the possibility of absolute paths in bytecode form,
rely on syntax objects to encode source locations (so that the
marshaling of syntax object can avoid absolute paths).
