;;; GNU Guix --- Functional package management for GNU
;;; Copyright © 2018 Danny Milosavljevic <dannym@scratchpost.org>
;;; Copyright © 2018 Tobias Geerinckx-Rice <me@tobias.gr>
;;;
;;; This file is part of GNU Guix.
;;;
;;; GNU Guix is free software; you can redistribute it and/or modify it
;;; under the terms of the GNU General Public License as published by
;;; the Free Software Foundation; either version 3 of the License, or (at
;;; your option) any later version.
;;;
;;; GNU Guix 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 General Public License for more details.
;;;
;;; You should have received a copy of the GNU General Public License
;;; along with GNU Guix.  If not, see <http://www.gnu.org/licenses/>.

(define-module (gnu packages pure)
  #:use-module ((guix licenses) #:prefix license:)
  #:use-module (guix packages)
  #:use-module (guix download)
  #:use-module (guix git-download)
  #:use-module (guix utils)
  #:use-module (guix build-system gnu)
  #:use-module (guix gexp)
  #:use-module (gnu packages)
  #:use-module (gnu packages llvm)
  #:use-module (gnu packages multiprecision))

(define-public pure
  (package
    (name "pure")
    (version "0.68")
    (source
     (origin
       (method url-fetch)
       (uri (string-append "https://github.com/agraef/pure-lang/releases/"
                           "download/pure-" version "/"
                           "pure-" version ".tar.gz"))
       (sha256
        (base32
         "0px6x5ivcdbbp2pz5n1r1cwg1syadklhjw8piqhl63n91i4r7iyb"))))
    (build-system gnu-build-system)
    (arguments
     `(#:make-flags (list (string-append "LDFLAGS=-Wl,-rpath="
                                         (assoc-ref %outputs "out")
                                         "/lib"))
       #:phases
       (modify-phases %standard-phases
         (add-after 'unpack 'patch-llvm-lookup
           (lambda _
             (substitute* "configure"
               (("-lLLVM-[$][{]llvm_version[}]")
                "`$LLVMCONF --libs`"))
             #t)))))
    (inputs
     `(("gmp" ,gmp)
       ("llvm" ,llvm-3.5)
       ("mpfr" ,mpfr)))
    (home-page "https://agraef.github.io/pure-lang/")
    (synopsis "Pure programming Language")
    (description "@code{pure} is a programming language based on term
rewriting.  It offers equational definitions with pattern matching,
full symbolic rewriting capabilities, dynamic typing, eager and lazy
evaluation, lexical closures, built-in list and matrix support and
a C interface.")
    (license license:gpl3+)))
4d4e772e590ad290f84959ee7176f7135951eb8&amp;showmsg=1'>Expand</a>)</th><th class='left'>Author</th></tr>
<tr><td><span title='2023-12-11 13:36:51 +0200'>2023-12-11</span></td><td><a href='/guix/commit/gnu/build/cross-toolchain.scm?id=c7d2faf1788a1f40defc9d4b875d19b912b6ef01'>gnu: cross-toolchain: Add set-cross-<tr><td><span title='2022-10-23 02:00:26 +0200'>2022-10-23</span></td><td><a href='/guix/commit/etc/guix-daemon.service.in?id=068f1a1905099f32beec9a8c4904efbb4c503981'>etc: systemd services shouldn't ‘RemainAfterExit’.</a><span class='msg-avail'>...</span></td><td>Tobias Geerinckx-Rice</td></tr>
<tr><td><span title='2022-10-23 02:00:25 +0200'>2022-10-23</span></td><td><a href='/guix/<tr><td><span title='2020-02-12 20:35:43 +0100'>2020-02-12</span></td><td><a href='/guix/commit/gnu/build/cross-toolchain.scm?id=89da127035737bdf922bc566970c5506c2e01b00'>gnu: cross-base: Switch back to 'CROSS_C_INCLUDE_PATH' &amp; co.</a><span class='msg-avail'>...</span></td><td>Ludovic Courtès</td></tr>
<tr><td><span title='2019-08-29 17:19:18 -0400'>2019-08-29</span></td><td><a href='/guix/commit/gnu/build/cross-toolchain.scm?id=0481289cbccba2646bf654f0ae49ac9c45602d5d'>Merge branch 'master' into core-updat<tr><td><span title='2021-07-07 23:54:20 -0400'>2021-07-07</span></td><td><a href='/guix/commit/etc/guix-daemon.service.in?id=4cbe0127a668cbcc64087c5d311308b59d39b104'>guix-install.sh: Prompt for configuring substitutes discovery.</a><span class='msg-avail'>...</span></td><td>Maxim Cournoyer</td></tr>
</td></tr>
<tr><td><span title='2019-08-22 15:53:27 -0400'>2019-08-22</span></td><td><a href='/guix/commit/gnu/build/cross-toolchain.scm?id=893c2df00daa4e6dd6a7ff3813d7df5329877f9e'>Merge branch 'master' into core-updates</a></td><td>Mark H Weaver</td></tr>
<tr><td><span title='2019-08-14 21:29:53 +0200'>2019-08-14</span></td><td><a href='/guix/commit/gnu/build/cross-toolchain.scm?id=67dac6b8920755cb011047157bb7b4fae4760143'>gnu: mingw: Add x86_64 support.</a><span class='msg-avail'>...</span></td><td>Carl Dong</td></tr>
<tr><td><span title='2019-02-28 19:15:02 +0100'>2019-02-28</span></td><td><a href='/guix/commit/gnu/build/cross-toolchain.scm?id=b45a97ea84befd28b6191aa9ca320b8758ee8090'>gnu: GCC: Move cross-toolchain build fix to (gnu packages cross-base).</a><span class='msg-avail'>...</span></td><td>Marius Bakke</td></tr>
<tr><td><span title='2019-02-09 21:53:41 +0100'>2019-02-09</span></td><td><a href='/guix/commit/gnu/build/cross-toolchain.scm?id=01e8263febb9634564b4b73af49b81a36567a11b'>gnu: Use GCC 7 as the default compiler.</a><span class='msg-avail'>...</span></td><td>Marius Bakke</td></tr>
<tr><td><span title='2018-03-23 04:41:53 -0400'>2018-03-23</span></td><td><a href='/guix/commit/gnu/build/cross-toolchain.scm?id=3e629738a3acd908acc510023c85db448e3553c3'>gnu: cross-base: Use invoke in (gnu build cross-toolchain).</a><span class='msg-avail'>...</span></td><td>Mark H Weaver</td></tr>