diff --git a/pkgs/racket-test/tests/generic/base-interfaces.rkt b/pkgs/racket-test/tests/generic/base-interfaces.rkt index 43c1a3e568..15deb83d9b 100644 --- a/pkgs/racket-test/tests/generic/base-interfaces.rkt +++ b/pkgs/racket-test/tests/generic/base-interfaces.rkt @@ -27,5 +27,5 @@ ;; ok if these don't raise unbound id errors (check-equal? (with-output-to-string (lambda () (write (tuple 5)))) "#0=#0#") (check-equal? (tuple 5) (tuple 5)) - (check-equal? (equal-hash-code (tuple 5)) 53) - (check-equal? (equal-secondary-hash-code (tuple 5)) 44)) + (check-equal? (equal-hash-code (tuple 5)) 54) + (check-equal? (equal-secondary-hash-code (tuple 5)) 45)) diff --git a/pkgs/racket-test/tests/generic/equal+hash.rkt b/pkgs/racket-test/tests/generic/equal+hash.rkt index b6a765cda4..a72707c6e8 100644 --- a/pkgs/racket-test/tests/generic/equal+hash.rkt +++ b/pkgs/racket-test/tests/generic/equal+hash.rkt @@ -16,5 +16,5 @@ (check-false (equal? (kons 1 2) 2)) (check-false (equal? 2 (kons 1 2))) (check-false (equal? (kons 1 2) (kons 3 4))) - (check-equal? (equal-hash-code (kons 1 2)) 60) + (check-equal? (equal-hash-code (kons 1 2)) 61) )