;;; GNU Guix --- Functional package management for GNU
;;; Copyright © 2015 Ricardo Wurmus <rekado@elephly.net>
;;; Copyright © 2019 Tobias Geerinckx-Rice <me@tobias.gr>
;;; Copyright © 2021 Simon South <simon@simonsouth.net>
;;;
;;; 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 ragel)
  #:use-module ((guix licenses) #:prefix license:)
  #:use-module (guix packages)
  #:use-module (guix download)
  #:use-module (guix build-system gnu)
  #:use-module (guix utils)
  #:use-module (gnu packages)
  #:use-module (gnu packages base))

(define-public ragel
  (package
    (name "ragel")
    (version "6.10")
    (source (origin
              (method url-fetch)
              (uri (string-append "https://www.colm.net/files/ragel/ragel-"
                                  version ".tar.gz"))
              (sha256
               (base32
                "0gvcsl62gh6sg73nwaxav4a5ja23zcnyxncdcdnqa2yjcpdnw5az"))))
    (build-system gnu-build-system)
    (arguments
     (if (target-aarch64?)
         '(#:phases
           (modify-phases %standard-phases
             (add-after 'unpack 'apply-char-signedness-fix
               ;; Apply a backported fix for aarch64-linux, where the C/C++
               ;; "char" type is unsigned by default.
               ;;
               ;; The patch is applied in this custom phase and not via the
               ;; "origin" object above to avoid rebuilding a large number of
               ;; packages on other platforms.
               (lambda _
                 (let ((patch
                        (search-input-file %build-inputs "/bin/patch"))
                       (char-signedness-patch
                        (assoc-ref %build-inputs "char-signedness-patch")))
                   (invoke patch "-p1" "-i" char-signedness-patch))))))
         '()))
    (native-inputs
     (if (target-aarch64?)
         `(("char-signedness-patch"
            ,(search-patch "ragel-char-signedness.patch"))
           ("patch" ,patch))
         '()))
    (home-page "https://www.colm.net/open-source/ragel/")
    (synopsis "State machine compiler")
    (description
     "Ragel compiles executable finite state machines from regular languages.
Ragel targets C, C++, Obj-C, C#, D, Java, Go and Ruby.  Ragel state machines
can not only recognize byte sequences as regular expression machines do, but
can also execute code at arbitrary points in the recognition of a regular
language.  Code embedding is done using inline operators that do not disrupt
the regular language syntax.")
    ;; GPLv2 (or later) with exception for generated code.
    (license license:gpl2+)))

n></td><td><a href='/guix/commit/gnu/packages/parallel.scm?id=9f66582ed0630de5895c77d9e1b8d8bad90f33b1'>gnu: xe: Update to 1.0.</a><span class='msg-avail'>...<span class='msg-tooltip'>* gnu/packages/parallel.scm (xe): Update to 1.0.

Change-Id: If881efcd1db46fddd33b48e044ea02ee73e4a98e
Signed-off-by: Ludovic Courtès &lt;ludo@gnu.org&gt;
</span></span></td><td>Greg Hogan</td></tr>
<tr><td><span title='2023-11-26 10:27:08 +0200'>2023-11-26</span></td><td><a href='/guix/commit/gnu/packages/parallel.scm?id=5bad11773004273bb29688bb3a8db4c5e2eedb14'>gnu: parallel: Update to 20231122.</a><span class='msg-avail'>...<span class='msg-tooltip'>* gnu/packages/parallel.scm (parallel): Update to 20231122.

Change-Id: Ia4a42fee8ce484845801b6e738a85f67169fae79
Signed-off-by: Efraim Flashner &lt;efraim@flashner.co.il&gt;
</span></span></td><td>Andy Tai</td></tr>
<tr><td><span title='2023-11-15 11:36:19 +0100'>2023-11-15</span></td><td><a href='/guix/commit/gnu/packages/parallel.scm?id=96753702a0f171e620891a15b618d0445beff520'>gnu: slurm: Add 23.02.6.</a><span class='msg-avail'>...<span class='msg-tooltip'>* gnu/packages/parallel.scm (slurm): Update to 23.02.6.
(slurm-22.05): New variable.
</span></span></td><td>Ludovic Courtès</td></tr>
<tr><td><span title='2023-10-28 16:33:23 +0200'>2023-10-28</span></td><td><a href='/guix/commit/gnu/packages/parallel.scm?id=ed4f93356b6601d7be1890675a62803921c0ca0e'>gnu: parallel: Update to 20231022.</a><span class='msg-avail'>...<span class='msg-tooltip'>* gnu/packages/parallel.scm (parallel): Update to 20231022.

Signed-off-by: Clément Lassieur &lt;clement@lassieur.org&gt;
Change-Id: I1af0cd5d61ebb4118d13dd0e2a56ea6b3d647c17
</span></span></td><td>Andy Tai</td></tr>
<tr><td><span title='2023-10-04 17:25:46 +0300'>2023-10-04</span></td><td><a href='/guix/commit/gnu/packages/parallel.scm?id=37d0befca0cd346046b094025dcc2051047f39d8'>gnu: parallel: Update to 20230922.</a><span class='msg-avail'>...<span class='msg-tooltip'>* gnu/packages/parallel.scm (parallel): Update to 20230922.

Signed-off-by: Efraim Flashner &lt;efraim@flashner.co.il&gt;
</span></span></td><td>Andy Tai</td></tr>
<tr><td><span title='2023-09-08 14:31:58 +0300'>2023-09-08</span></td><td><a href='/guix/commit/gnu/packages/parallel.scm?id=45af7b89239d4bbdc145a5c9cc03356f31d5a20e'>gnu: parallel: Update to 20230822.</a><span class='msg-avail'>...<span class='msg-tooltip'>* gnu/packages/parallel.scm (parallel): Update to 20230822.

Signed-off-by: Efraim Flashner &lt;efraim@flashner.co.il&gt;
</span></span></td><td>Andy Tai</td></tr>