From 7f6db0578df2408cb1435970bfed2918731fb874 Mon Sep 17 00:00:00 2001 From: Matthew Butterick Date: Tue, 23 Apr 2019 10:54:23 -0700 Subject: [PATCH] warn about missing `cache-watchlist` file --- pollen/private/cache-utils.rkt | 4 ++++ pollen/private/ts.rktd | 2 +- 2 files changed, 5 insertions(+), 1 deletion(-) diff --git a/pollen/private/cache-utils.rkt b/pollen/private/cache-utils.rkt index 4225cf1..916e792 100644 --- a/pollen/private/cache-utils.rkt +++ b/pollen/private/cache-utils.rkt @@ -2,8 +2,10 @@ (require "file-utils.rkt" "../setup.rkt" "project.rkt" + "log.rkt" file/cache racket/file + racket/path racket/list sugar/coerce sugar/test @@ -33,6 +35,8 @@ (for/list ([ps (in-list path-strings-to-track)]) (cond [ps (define cp (->complete-path ps)) + (unless (file-exists? cp) + (message (format "watchlist file /~a does not exist" (find-relative-path (current-project-root) cp)))) (cons (path->string cp) (file-or-directory-modify-seconds cp #false (λ () 0)))] [else #false]))) (list* pollen-env poly-flag (and output-path (path->string output-path)) path+mod-time-pairs)) diff --git a/pollen/private/ts.rktd b/pollen/private/ts.rktd index 9a07fcf..81a973b 100644 --- a/pollen/private/ts.rktd +++ b/pollen/private/ts.rktd @@ -1 +1 @@ -1556041577 +1556042063