@@ 1737,17 1737,28 @@ to enforce it.")
(string-append
": \"llvm\",\n\tr\"static elaboration, LLVM JIT code "
"generator\": \"llvm-jit\",")))))
- (add-after 'ensure-no-mtimes-pre-1980 'dosymlink
- (lambda* (#:key inputs #:allow-other-keys)
- (with-directory-excursion "vunit/vhdl/JSON-for-VHDL"
+ (add-after 'install 'unbundle
+ (lambda* (#:key inputs outputs #:allow-other-keys)
+ (let ((site-packages
+ (string-append (site-packages inputs outputs)
+ "/vunit/vhdl/")))
+ (mkdir-p (string-append site-packages "JSON-for-VHDL"))
(symlink
- (search-input-directory inputs "/share/json-for-vhdl")
- "src"))
- (with-directory-excursion "vunit/vhdl"
- (delete-file-recursively "osvvm")
+ (search-input-directory inputs "share/json-for-vhdl")
+ (string-append site-packages "JSON-for-VHDL/src"))
(symlink
- (search-input-directory inputs "/share/osvvm/osvvm")
- "osvvm")))))
+ (search-input-directory inputs "share/osvvm/osvvm")
+ (string-append site-packages "osvvm")))))
+ (add-after 'check 'run-examples
+ ;; Run examples as an extra check.
+ (lambda* (#:key inputs outputs #:allow-other-keys)
+ (with-directory-excursion "examples/vhdl"
+ (for-each
+ (lambda (dir)
+ (invoke "python3" (string-append dir "/run.py")))
+ (list
+ "array" "check" "composite_generics" "json4vhdl" "logging"
+ "logging" "uart" "vhdl_configuration"))))))
#:test-flags
;; Skip lint tests which require python-pycodestyle, python-pylint and
;; python-mypy to reduce closoure size; some lint test fails, see