fix test

2016-04-05 15:03:18 -03:00 · 2016-04-05 15:03:18 -03:00 · a0a44d8d5f
commit a0a44d8d5f
parent 596c571ab1
1 changed files with 3 additions and 3 deletions
--- a/pkgs/racket-test-core/tests/racket/optimize.rktl
+++ b/pkgs/racket-test-core/tests/racket/optimize.rktl
@ -1078,9 +1078,9 @@
                              [y (random)])
                       (list x x y y))
                    #f))])
-  (test-equal? eq?)
-  (test-equal? eqv?)
-  (test-equal? equal?))
+  (test-equal? 'eq?)
+  (test-equal? 'eqv?)
+  (test-equal? 'equal?))

 (test-comp '(let ([x 3]) x)
 	   '((lambda (x) x) 3))