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

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

Browse Source
This commit is contained in:
Robby Findler 2010-09-15 08:23:34 -05:00
parent ec0711bf49
commit 3121ab0fce
1 changed files with 0 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
collects/tests/racket/contract-test.rktl
View File

@ -9698,9 +9698,6 @@ so that propagation occurs.
(f 3)) (f 3))
(c))) (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 (ctest 1
'case->-regular 'case->-regular
(let ([c (counter)]) (let ([c (counter)])