guix/config.scm.in

   1 ;;; Guix --- Nix package management from Guile.         -*- coding: utf-8 -*-
   2 ;;; Copyright (C) 2012 Ludovic Courtès <ludo@gnu.org>
   3 ;;;
   4 ;;; This file is part of Guix.
   5 ;;;
   6 ;;; Guix is free software; you can redistribute it and/or modify it
   7 ;;; under the terms of the GNU General Public License as published by
   8 ;;; the Free Software Foundation; either version 3 of the License, or (at
   9 ;;; your option) any later version.
  10 ;;;
  11 ;;; Guix is distributed in the hope that it will be useful, but
  12 ;;; WITHOUT ANY WARRANTY; without even the implied warranty of
  13 ;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  14 ;;; GNU General Public License for more details.
  15 ;;;
  16 ;;; You should have received a copy of the GNU General Public License
  17 ;;; along with Guix.  If not, see <http://www.gnu.org/licenses/>.
  18
  19 (define-module (guix config)
  20   #:export (%guix-package-name
  21             %guix-version
  22             %guix-bug-report-address
  23             %store-directory
  24             %state-directory
  25             %system
  26             %libgcrypt
  27             %nixpkgs
  28             %nix-instantiate))
  29
  30 ;;; Commentary:
  31 ;;;
  32 ;;; Compile-time configuration of Guix.
  33 ;;;
  34 ;;; Code:
  35
  36 (define %guix-package-name
  37   "@PACKAGE_NAME@")
  38
  39 (define %guix-version
  40   "@PACKAGE_VERSION@")
  41
  42 (define %guix-bug-report-address
  43   "@PACKAGE_BUGREPORT@")
  44
  45 (define %store-directory
  46   "@storedir@")
  47
  48 (define %state-directory
  49   "@guix_localstatedir@")
  50
  51 (define %system
  52   "@guix_system@")
  53
  54 (define %libgcrypt
  55   "@LIBGCRYPT@")
  56
  57 (define %nixpkgs
  58   (if (string=? "@NIXPKGS@" "")
  59       #f
  60       "@NIXPKGS@"))
  61
  62 (define %nix-instantiate
  63   "@NIX_INSTANTIATE@")
  64
  65 ;;; config.scm ends here