;; We want to point at the scheme code that hasn't been installed yet so that
;; 'make check' during development can work correctly.
(scheme-directory "${SCMDIR}")

;; We want to use the symbols that haven't been installed yet
(map (lambda (x) (component-library (string-join (list "${SYMDIR}/" x) "")))
     '("io" "74" "analog" "power"))

(source-library "${TESTDIR}")
(component-library "${TESTDIR}")
;(net-naming-priority "label")

;(hierarchy-traversal "disabled")
;(hierarchy-uref-mangle "disabled") 
;(hierarchy-netname-mangle "disabled")
;(hierarchy-netattrib-mangle "disabled")

;(hierarchy-netname-separator ".")
;(hierarchy-uref-separator ".")
;(hierarchy-netattrib-separator ".")

;(hierarchy-netname-order "prepend")
;(hierarchy-uref-order "prepend")
;(hierarchy-netattrib-order "prepend")