diff --git a/collects/scheme/sandbox.ss b/collects/scheme/sandbox.ss index fadb043aca..d5dfe981b0 100644 --- a/collects/scheme/sandbox.ss +++ b/collects/scheme/sandbox.ss @@ -433,7 +433,7 @@ (define-evaluator-messenger kill-evaluator 'kill) (define-evaluator-messenger break-evaluator 'break) -(define-evaluator-messenger (set-eval-limits . xs) 'limits) +(define-evaluator-messenger (set-eval-limits secs mb) 'limits) (define-evaluator-messenger (put-input . xs) 'input) (define-evaluator-messenger get-output 'output) (define-evaluator-messenger get-error-output 'error-output)