#!/bin/sh

builddir="$(cd "$(dirname "$0")" && pwd -P)"
cd "$builddir"

eval "$(awk '/^srcdir=/ {print $0; exit(0);}' "$builddir"/config.status)"
srcdir="$(cd "$srcdir" && pwd -P)"

printf '%s' '
(define-module ('"$1"' pre-inst-config)
  #:export (config))

(define datarootpath
  (map (lambda (base)
         (string-append base "/src/resources"))
       `("'"$builddir"'" "'"$srcdir"'")))

(define config
  `((datarootpath . ,datarootpath)))
'