mirror of
https://git.in.rschanz.org/ryan77627/guix.git
synced 2024-12-26 22:38:07 -05:00
gnu: gegl: Extend test time-outs.
* gnu/packages/gimp.scm (gegl)[arguments]: Add an 'extend-test-time-outs phase.
This commit is contained in:
parent
4c9438c083
commit
ef05520873
1 changed files with 16 additions and 1 deletions
|
@ -223,7 +223,22 @@ (define-public gegl
|
|||
(build-system meson-build-system)
|
||||
(arguments
|
||||
`(#:configure-flags
|
||||
(list "-Dintrospection=false")))
|
||||
(list "-Dintrospection=false")
|
||||
#:phases
|
||||
(modify-phases %standard-phases
|
||||
(add-after 'unpack 'extend-test-time-outs
|
||||
(lambda _
|
||||
;; Multiply some poorly-chosen time-outs for busy build machines.
|
||||
(substitute* "tests/simple/test-node-exponential.c"
|
||||
(("G_TIME_SPAN_SECOND" match)
|
||||
(string-append "10 * " match)))
|
||||
(substitute* "tests/simple/test-buffer-sharing.c"
|
||||
(("g_timeout_add_seconds\\([0-9]+" match)
|
||||
(string-append match "0")))
|
||||
(substitute* (find-files "tests" "^meson\\.build$")
|
||||
(("timeout ?: [0-9]+" match)
|
||||
(string-append match "0")))
|
||||
#t)))))
|
||||
;; These are propagated to satisfy 'gegl-0.4.pc'.
|
||||
(propagated-inputs
|
||||
`(("babl" ,babl)
|
||||
|
|
Loading…
Reference in a new issue