From a883f5cd401fe3cd097ccfc268720f3038328822 Mon Sep 17 00:00:00 2001
From: Spencer Florence <florence@ccs.neu.edu>
Date: Mon, 29 Dec 2014 19:03:45 -0600
Subject: [PATCH] force simplifaction of paths to stop modread from breaking

---
 cover.rkt | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/cover.rkt b/cover.rkt
index 4504354..c5df53a 100644
--- a/cover.rkt
+++ b/cover.rkt
@@ -18,7 +18,7 @@
 ;; returns true if all tests passed
 (define (test-files! . paths)
   (clear-coverage!)
-  (for ([p paths])
+  (for ([p (map simplify-path paths)])
     (let loop ()
       (define-values (loc type) (get-module-path (build-path p)))
       (case type