gnu: gegl: Extend test time-outs.

* gnu/packages/gimp.scm (gegl)[arguments]: Add an 'extend-test-time-outs phase.
This commit is contained in:
Tobias Geerinckx-Rice 2020-11-28 15:05:38 +01:00
parent 4c9438c083
commit ef05520873
No known key found for this signature in database
GPG key ID: 0DB0FF884F556D79

View file

@ -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)