Skip to content

Commit 11d8263

Browse files
committed
@shhyou has better fixes and a better plan here
Revert "recent changes in the htdp languages have improved the messages here; make the expected results less specific in response" This reverts commit aca2cf2.
1 parent aca2cf2 commit 11d8263

1 file changed

Lines changed: 5 additions & 5 deletions

File tree

drracket-test/tests/drracket/module-lang-test.rkt

Lines changed: 5 additions & 5 deletions
Original file line numberDiff line numberDiff line change
@@ -854,21 +854,21 @@ f: contract violation
854854
Check failures:\s*
855855
+check-satisfied for empty encountered an error[.]\s*
856856
+:: +at line 11, column 0 +function call: expect.+function.+open parenthesis.+received '[(][)]\s*
857-
at line 11, column 0.*
857+
at line 11, column 0
858858
+check-satisfied for local-even encountered an error[.]\s*
859859
+:: +at line 12, column 0 +my-even: expect.+2 arguments.+found only 1\s*
860-
at line 12, column 0.*
860+
at line 12, column 0
861861
+check-satisfied for real-my-even encountered an error[.]\s*
862862
+:: +at line 13, column 0 +check-satisfied: expect.+function.+one argument.+second position.+real-my-even\s*
863-
at line 13, column 0.*
863+
at line 13, column 0
864864
> }))
865865
;; Includes the flattened test result snips.
866866
(define full-ints-text
867867
(send ints get-text (send ints paragraph-start-position 2) 'eof #t))
868868
(define passed?
869869
(regexp-match? re full-ints-text))
870870
(unless passed?
871-
(eprintf "FAILED line ~a: ~a\n extra assertion expected: ~s\n\n got: ~s\n"
871+
(eprintf "FAILED line ~a: ~a\n extra assertion expected: ~s\n\n got: ~a\n"
872872
(test-line test)
873873
(test-definitions test)
874874
re
@@ -1210,7 +1210,7 @@ f: contract violation
12101210
Check failures:\s*
12111211
+check-expect encountered the following error instead of the expected value, 111[.]\s*
12121212
+:: +at line 12, column 14 oops:\s*
1213-
at line 12, column 0.*
1213+
at line 12, column 0
12141214
> }))
12151215
;; Includes the flattened test result snips.
12161216
(define full-ints-text

0 commit comments

Comments
 (0)