From e0bad1987d2d94424ef6594696716521e20ff436 Mon Sep 17 00:00:00 2001 From: Stevie Strickland Date: Sun, 13 Jul 2008 06:12:06 -0400 Subject: [PATCH] Was thinking of doing some cleanups here, but at the very least I can get rid of this useless remove, since it's just going to overwrite it anyway if we don't remove it first. --- collects/typed-scheme/private/free-variance.ss | 1 - 1 file changed, 1 deletion(-) diff --git a/collects/typed-scheme/private/free-variance.ss b/collects/typed-scheme/private/free-variance.ss index 151fe78104..134c71400e 100644 --- a/collects/typed-scheme/private/free-variance.ss +++ b/collects/typed-scheme/private/free-variance.ss @@ -62,7 +62,6 @@ ;; given a set of free variables, remove bound, add bound ... (define (fix-bound vs bound) (define vs* (hash-map* (lambda (k v) v) vs)) - (hash-remove! vs* bound) (hash-set! vs* bound Dotted) vs*)