suzanne.soy/racket
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

fix test

Browse Source
This commit is contained in:
Gustavo Massaccesi 2016-04-05 15:03:18 -03:00
parent 596c571ab1
commit a0a44d8d5f
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
pkgs/racket-test-core/tests/racket/optimize.rktl
View File

@ -1078,9 +1078,9 @@
[y (random)]) [y (random)])
(list x x y y)) (list x x y y))
#f))]) #f))])
(test-equal? eq?) (test-equal? 'eq?)
(test-equal? eqv?) (test-equal? 'eqv?)
(test-equal? equal?)) (test-equal? 'equal?))
(test-comp '(let ([x 3]) x) (test-comp '(let ([x 3]) x)
'((lambda (x) x) 3)) '((lambda (x) x) 3))