amaharaneko/guix-mirrors
1
1
Fork 0
mirror of https://codeberg.org/guix/guix.git synced 2025-10-02 02:15:12 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions

gnu: ocaml-sedlex: Use G-Expressions.

Browse source 
* gnu/packages/ocaml.scm (ocaml-sedlex): Use G-expressions.

Change-Id: I1dd8b9e1cefef90ff4cdcc592f5ad3d735a5081b
Signed-off-by: Ludovic Courtès <ludo@gnu.org>
This commit is contained in:
Jean-Pierre De Jesus DIAZ 2024-05-23 13:47:04 +02:00 • committed by Ludovic Courtès
parent 53ef4bf537
commit a6d34a6fe1
No known key found for this signature in database
GPG key ID: 090B11993D9AEBB5
1 changed files with 19 additions and 21 deletions
Download patch file Download diff file Expand all files Collapse all files

40
gnu/packages/ocaml.scm
View file

@ -3720,27 +3720,25 @@ and consumable.")
"1z8mmk1idh9hjhh2b9rp5b1h8kmzcxhagqkw0pvxn6ykx1brskq1")))) "1z8mmk1idh9hjhh2b9rp5b1h8kmzcxhagqkw0pvxn6ykx1brskq1"))))
(build-system dune-build-system) (build-system dune-build-system)
(arguments (arguments
`(#:tests? #f ; no tests (list #:tests? #f ; no tests
#:package "sedlex" #:package "sedlex"
#:phases #:phases
(modify-phases %standard-phases #~(modify-phases %standard-phases
(add-before 'build 'copy-resources (add-before 'build 'copy-resources
(lambda* (#:key inputs #:allow-other-keys) (lambda* (#:key inputs #:allow-other-keys)
(with-directory-excursion "src/generator/data" (with-directory-excursion "src/generator/data"
;; Newer versions of dune emit an error if files it wants to ;; Newer versions of dune emit an error if files it wants to
;; build already exist. Delete the dune file so dune doesn't ;; build already exist. Delete the dune file so dune doesn't
;; complain. ;; complain.
(delete-file "dune") (delete-file "dune")
(for-each (for-each
(lambda (file) (lambda (file)
(copy-file (assoc-ref inputs file) file)) (copy-file (assoc-ref inputs file) file))
'("DerivedCoreProperties.txt" "DerivedGeneralCategory.txt" '("DerivedCoreProperties.txt" "DerivedGeneralCategory.txt"
"PropList.txt"))) "PropList.txt")))))
#t)) (add-before 'build 'chmod
(add-before 'build 'chmod (lambda _
(lambda _ (for-each (lambda (file) (chmod file #o644)) (find-files "." ".*")))))))
(for-each (lambda (file) (chmod file #o644)) (find-files "." ".*"))
#t)))))
(propagated-inputs (propagated-inputs
(list ocaml-gen ocaml-ppxlib ocaml-uchar)) (list ocaml-gen ocaml-ppxlib ocaml-uchar))
;; These three files are needed by src/generator/data/dune, but would be ;; These three files are needed by src/generator/data/dune, but would be