diff options
| author | Arun Isaac | 2025-04-22 22:04:20 +0100 |
|---|---|---|
| committer | Arun Isaac | 2025-04-22 22:19:32 +0100 |
| commit | 91a52ca755f64c8336c1ba2753e0be978dd4f9b0 (patch) | |
| tree | 197aa97876d172e3ebc6f63fbf89989f9cfa8b0a | |
| parent | ff89b8cef7b56d3665937de02629e60c8ca1bed7 (diff) | |
| download | ravanan-91a52ca755f64c8336c1ba2753e0be978dd4f9b0.tar.gz ravanan-91a52ca755f64c8336c1ba2753e0be978dd4f9b0.tar.lz ravanan-91a52ca755f64c8336c1ba2753e0be978dd4f9b0.zip | |
work/command-line-tool: Comment on trusting the checksum.
* ravanan/work/command-line-tool.scm (canonicalize-file-value):
Comment on trusting the checksum.
| -rw-r--r-- | ravanan/work/command-line-tool.scm | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/ravanan/work/command-line-tool.scm b/ravanan/work/command-line-tool.scm index 198addd..853b4fb 100644 --- a/ravanan/work/command-line-tool.scm +++ b/ravanan/work/command-line-tool.scm @@ -234,6 +234,11 @@ actually paths." ("nameroot" . ,(file-name-stem path)) ("nameext" . ,(file-name-extension path)) ("size" . ,(stat:size (stat path))) + ;; Compute the checksum, but only if it is not provided. + ;; If it is provided, trust that it is correct. This + ;; avoids costly (think hashing terabytes of data) hash + ;; computations causing a long delay before the workflow + ;; actually starts running. ("checksum" . ,(or (assoc-ref value "checksum") (checksum path)))) (cons "secondaryFiles" |