;; fibers

;;;; Copyright (C) 2017 Andy Wingo <wingo@pobox.com>
;;;;
;;;; This library is free software; you can redistribute it and/or
;;;; modify it under the terms of the GNU Lesser General Public
;;;; License as published by the Free Software Foundation; either
;;;; version 3 of the License, or (at your option) any later version.
;;;;
;;;; This library is distributed in the hope that it will be useful,
;;;; but WITHOUT ANY WARRANTY; without even the implied warranty of
;;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
;;;; Lesser General Public License for more details.
;;;;
;;;; You should have received a copy of the GNU Lesser General Public License
;;;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
;;;;

(define-module (fibers config)
  #:export (extension-library))

(define *extlibdir*
  (cond
   ((getenv "FIBERS_BUILD_DIR")
    => (lambda (builddir) (in-vicinity builddir ".libs")))
   (else "@extlibdir@")))

(define (extension-library lib)
  (in-vicinity *extlibdir* lib))
