diff --git a/js-assembler/db-cache.rkt b/js-assembler/db-cache.rkt new file mode 100644 index 0000000..756eae8 --- /dev/null +++ b/js-assembler/db-cache.rkt @@ -0,0 +1,22 @@ +#lang racket/base + +(require (planet ryanc/db) + "../version.rkt") + + +(when (not (file-exists? "whalesong-cache.sqlite3")) + (define conn + (sqlite3-connect #:database "whalesong-cache.sqlite3" + #:mode 'create)) + (disconnect conn)) + + +(define conn + (sqlite3-connect #:database "whalesong-cache.sqlite3")) + + +(define (cached? path) + #f) + +(define (save-in-cache! path) + (void)) \ No newline at end of file