I agree with Stevie that 1 is the right answer here.

2010-09-15 08:23:34 -05:00 · 2010-09-15 08:23:34 -05:00 · 3121ab0fce
commit 3121ab0fce
parent ec0711bf49
1 changed files with 0 additions and 3 deletions
--- a/collects/tests/racket/contract-test.rktl
+++ b/collects/tests/racket/contract-test.rktl
@ -9698,9 +9698,6 @@ so that propagation occurs.
             (f 3))
           (c)))
  
-  ;; Robby had this as 2, but now we only end up checking it once, which
-  ;; looks right to me.  Not sure whether "2" was _wanted_, or if it just
-  ;; happened to be what it returned when run.
  (ctest 1
         'case->-regular
         (let ([c (counter)])