np/hdl-unit-test-suite
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

Downcase testbench name in work directory name

Browse Source
This commit is contained in:
Nikolay Puzanov 2022-07-08 22:12:00 +03:00
parent 0d3468277f
commit fa05283d68
1 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
utest.scm
View File

@ -683,7 +683,8 @@
(work (mkdtemp (format "~a/~a~a-~a-~a-XXXXXX" (work (mkdtemp (format "~a/~a~a-~a-~a-XXXXXX"
base WORK_DIR_PREFIX base WORK_DIR_PREFIX
makefile-name makefile-name
(string-map (lambda (c) (if (char-whitespace? c) #\_ c)) name) (string-map (lambda (c) (if (char-whitespace? c) #\_ c))
(string-downcase name))
(current-time))))) (current-time)))))
;; Execute test ;; Execute test
(let* ((p #f) (let* ((p #f)