use the test expression as the source for the whole expression, so it is all shown as uncovered until executed
use the test expression as the source for the whole expression, so it is all shown as uncovered until executed

svn: r13158

mafagafogigante/racket,mafagafogigante/racket,mafagafogigante/racket,mafagafogigante/racket,mafagafogigante/racket,mafagafogigante/racket,mafagafogigante/racket,mafagafogigante/racket,mafagafogigante/racket