delete "compiled" directories as part of cache reset

pollen/cache.rkt

@@ -14,7 +14,10 @@
 
   (for ([path (in-directory starting-dir)]
         #:when (and (directory-exists? path)
-                    (equal? (path->string (car (reverse (explode-path path)))) (setup:cache-dir-name))))
+                    (let* ([last (compose1 car reverse)]
+                           [last-path-element (path->string (last (explode-path path)))])
+                      (or (equal? last-path-element (setup:cache-dir-name))
+                          (equal? last-path-element "compiled")))))
        (message (format "removing cache directory: ~a" path))
        (delete-directory/files path)))
 

pollen/private/ts.rktd

@@ -1 +1 @@
-1469050761
+1469678452