Optionally enable timestamp in save snippet uri

This commit is contained in:
Nikolay Puzanov 2022-12-04 12:09:32 +03:00
parent 536bde92df
commit 53412381fb

View File

@ -28,6 +28,7 @@
(define SNIPPET-FILE "code.sv") (define SNIPPET-FILE "code.sv")
(define IVERILOG-METATOP-FILE "top_iverilog.sv") (define IVERILOG-METATOP-FILE "top_iverilog.sv")
(define VERILATOR-CPP-FILE "top_verilator.cpp") (define VERILATOR-CPP-FILE "top_verilator.cpp")
(define USE-TIME-IN-SAVE-URL #f)
(define IVERILOG-EXE "iverilog") (define IVERILOG-EXE "iverilog")
(define VVP-EXE "vvp") (define VVP-EXE "vvp")
@ -668,8 +669,9 @@
(mkdtemp (mkdtemp
(path+ (path+
stor-base stor-base
(format "~a-XXXXXX" (if USE-TIME-IN-SAVE-URL
(current-time))))) (format "~a-XXXXXX" (current-time))
"XXXXXX"))))
ref-stor-dir))) ref-stor-dir)))
(save-to-storage (path+ stor-base stor-dir) code) (save-to-storage (path+ stor-base stor-dir) code)
(make-response (make-response