build: Support --srcdir build.
[mes.git] / module / mescc / mescc.scm
index b384b90e7042d32c4c72450b038acd58f842ce20..711bac6d948132fb20e592052fe391fe9647beea 100644 (file)
   (arch-find options (string-append "lib" o ext)))
 
 (define* (arch-find options file-name)
-  (let* ((path (cons (prefix-file options "lib")
-                     (filter-map (multi-opt 'library-dir) options)))
+  (let* ((top-builddest (or (getenv "top_builddest") ""))
+         (builddir-lib (string-append top-builddest "lib"))
+         (path (cons* builddir-lib
+                      (prefix-file options "lib")
+                      (filter-map (multi-opt 'library-dir) options)))
          (arch-file-name (string-append "x86-mes/" file-name))
          (verbose? (option-ref options 'verbose #f)))
     (when verbose?