Small cosmetic fix - replace 'if' to 'and'
This commit is contained in:
parent
2c8c60429c
commit
fa1170eb59
@ -4,22 +4,20 @@
|
|||||||
|
|
||||||
(let ((top "vpi_log2"))
|
(let ((top "vpi_log2"))
|
||||||
;; compile VPI module in the base directory
|
;; compile VPI module in the base directory
|
||||||
(if (utest/iverilog-compile-vpi "vpi_log2.c"
|
(and (utest/iverilog-compile-vpi "vpi_log2.c"
|
||||||
#:output-dir (utest/base-path)
|
#:output-dir (utest/base-path)
|
||||||
#:name top #:libs "m")
|
#:name top #:libs "m")
|
||||||
(map
|
(map
|
||||||
(lambda (arg)
|
(lambda (arg)
|
||||||
(utest/tb
|
(utest/tb
|
||||||
((format "log2_~a" arg))
|
((format "log2_~a" arg))
|
||||||
|
|
||||||
(utest/run-simulation-iverilog
|
(utest/run-simulation-iverilog
|
||||||
"vpi_log2.sv"
|
"vpi_log2.sv"
|
||||||
top
|
top
|
||||||
|
|
||||||
#:parameters `((ARGUMENT ,arg))
|
#:parameters `((ARGUMENT ,arg))
|
||||||
#:vpimods top
|
#:vpimods top
|
||||||
;; VPI modules search path
|
;; VPI modules search path
|
||||||
#:vpipaths (utest/base-path))))
|
#:vpipaths (utest/base-path))))
|
||||||
(iota 20))
|
(iota 20))))
|
||||||
|
|
||||||
#f))
|
|
||||||
|
|||||||
@ -8,12 +8,10 @@
|
|||||||
(utest/tb
|
(utest/tb
|
||||||
((format "log2_~a" arg))
|
((format "log2_~a" arg))
|
||||||
|
|
||||||
(if (utest/iverilog-compile-vpi "vpi_log2.c" #:name top #:libs "m")
|
(and (utest/iverilog-compile-vpi "vpi_log2.c" #:name top #:libs "m")
|
||||||
(utest/run-simulation-iverilog
|
(utest/run-simulation-iverilog
|
||||||
"vpi_log2.sv"
|
"vpi_log2.sv"
|
||||||
top
|
top
|
||||||
#:parameters `((ARGUMENT ,arg))
|
#:parameters `((ARGUMENT ,arg))
|
||||||
#:vpimods top)
|
#:vpimods top))))
|
||||||
|
|
||||||
#f)))
|
|
||||||
(iota 20)))
|
(iota 20)))
|
||||||
|
|||||||
Loading…
x
Reference in New Issue
Block a user