TakeV/guix
1
0
Fork 0
Code Issues Pull requests Packages Projects Releases Wiki Activity

gnu: orc: Use 'modify-phases'.

Browse source 
* gnu/packages/gstreamer.scm (orc)[arguments]: Use the 'modify-phases'
syntax.
This commit is contained in:
Efraim Flashner 2016-09-06 08:47:22 +03:00
parent c6f0b0f603
commit 462b567650
No known key found for this signature in database
GPG key ID: F4C1D3917EACEE93
1 changed files with 12 additions and 12 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

10
gnu/packages/gstreamer.scm
View file

@ -72,9 +72,10 @@ (define-public orc
(base32 (base32
"0jd69ynvr3k70mlxxgbsk047l1rd63m1wkj3qdcq7644xy0gllkx")))) "0jd69ynvr3k70mlxxgbsk047l1rd63m1wkj3qdcq7644xy0gllkx"))))
(build-system gnu-build-system) (build-system gnu-build-system)
(arguments `(#:phases (arguments
(alist-cons-before `(#:phases
'check 'disable-faulty-test (modify-phases %standard-phases
(add-before 'check 'disable-faulty-test
(lambda _ (lambda _
;; XXX Disable the 'test-limits' and 'exec_opcodes_sys' ;; XXX Disable the 'test-limits' and 'exec_opcodes_sys'
;; tests, which fail on some machines. See: ;; tests, which fail on some machines. See:
@ -82,8 +83,7 @@ (define-public orc
(substitute* '("testsuite/test-limits.c" (substitute* '("testsuite/test-limits.c"
"testsuite/exec_opcodes_sys.c") "testsuite/exec_opcodes_sys.c")
(("if \\(error\\) return 1;") (("if \\(error\\) return 1;")
"if (error) return 77;"))) "if (error) return 77;")))))))
%standard-phases)))
(home-page "http://code.entropywave.com/orc/") (home-page "http://code.entropywave.com/orc/")
(synopsis "Oil runtime compiler") (synopsis "Oil runtime compiler")
(description (description