From 10c9b39bfe95f58f70829dc2a7cb771185cb8957 Mon Sep 17 00:00:00 2001 From: Eli Barzilay Date: Tue, 2 Dec 2008 14:39:36 +0000 Subject: [PATCH] removed unused variable svn: r12675 --- collects/scheme/sandbox.ss | 1 - 1 file changed, 1 deletion(-) diff --git a/collects/scheme/sandbox.ss b/collects/scheme/sandbox.ss index 89afc5bab3..71bceafb46 100644 --- a/collects/scheme/sandbox.ss +++ b/collects/scheme/sandbox.ss @@ -563,7 +563,6 @@ (car (evaluator-message-args expr)) '()))] [else (error 'evaluator "internal error, bad message: ~e" msg)])) (user-eval expr))) - (define linked-outputs? #f) (define (make-output what out set-out! allow-link?) (cond [(not out) (open-output-nowhere)] [(and (procedure? out) (procedure-arity-includes? out 0)) (out)]