lassik
/
scheme
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

Remove unused variable

This commit is contained in:
Lassi Kortela 2019-12-28 02:49:28 +02:00
parent a0ea1aabe2
commit 4591f2588a
1 changed files with 1 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
trivial-tar-writer.scm
View File

@ -29,8 +29,7 @@
bytes (bytevector 0)))) bytes (bytevector 0))))
(define (tar-write-file fake-path bytes) (define (tar-write-file fake-path bytes)
(let* ((unix-time-now 0) (let* ((nbyte (bytevector-length bytes))
(nbyte (bytevector-length bytes))
(nnull (- 512 (truncate-remainder nbyte 512))) (nnull (- 512 (truncate-remainder nbyte 512)))
(header-before-checksum (header-before-checksum
(bytevector-append (bytevector-append