removed extra arg from call to 'go'

svn: r16457

collects/tests/stepper/test-engine.ss

@@ -178,8 +178,6 @@
             show-lambdas-as-lambdas?
             ;; language level:
             'testing
-            ;; run-in-drscheme thunk:
-            (lambda (thunk) (thunk))
             (disable-stepper-error-handling))))
     (error-display-handler current-error-display-handler)))
 

collects/tests/stepper/through-tests.ss

@@ -302,13 +302,6 @@
    -> {(cond (else 3))}
    -> {3})
 
-(t 'identical-clauses m:upto-int/lam
-   (cond [(= 1 1) true] [(= 1 1) true])
-   :: (cond [{(= 1 1)} true] [(= 1 1) true])
-   -> (cond [{true} true] [(= 1 1) true])
-   :: {(cond [true true] [(= 1 1) true])}
-   -> {true})
-
 ;;  reconstruct can't handle 'begin'
 #;
 (m:mz "(cond [#f 3 4] [#t (+ 3 4) (+ 4 9)])"
@@ -1450,7 +1443,6 @@
       #;(run-tests '(check-expect forward-ref check-within check-within-bad check-error check-error-bad))
       #;(run-tests '(teachpack-universe))
       #;(run-tests '(check-expect check-within))
-      (run-tests '(identical-clauses))
-      #;(run-all-tests)))
+      (run-all-tests)))