From fc920b18bb8be099d16d1d298d3bbe6ef18f0cc0 Mon Sep 17 00:00:00 2001 From: Eli Barzilay Date: Tue, 2 Dec 2008 00:15:58 +0000 Subject: [PATCH] set-eval-limits requires two arguments svn: r12669 --- collects/scheme/sandbox.ss | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) 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)