mirror/guix
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/guix.git synced 2025-01-18 21:46:35 +01:00
Code Issues Projects Releases Packages Wiki Activity Actions

PRELIMINARY: Orc fixes on MIPS.

Browse source
This commit is contained in:
Mark H Weaver 2016-08-16 22:59:20 -04:00
parent 4e2cc3ec56
commit 476cdbba3f
No known key found for this signature in database
GPG key ID: 7CEF29847562C516
1 changed files with 30 additions and 7 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

37
gnu/packages/gstreamer.scm
View file

@ -2,7 +2,7 @@
;;; Copyright © 2013, 2015 Andreas Enge <andreas@enge.fr>
;;; Copyright © 2014 John Darrington <jmd@gnu.org>
;;; Copyright © 2015, 2016 Sou Bunnbu <iyzsong@gmail.com>
;;; Copyright © 2015 Mark H Weaver <mhw@netris.org>
;;; Copyright © 2015, 2016 Mark H Weaver <mhw@netris.org>
;;; Copyright © 2016 Efraim Flashner <efraim@flashner.co.il>
;;;
;;; This file is part of GNU Guix.
@ -82,7 +82,15 @@ (define-public orc
(substitute* '("testsuite/test-limits.c"
"testsuite/exec_opcodes_sys.c")
(("if \\(error\\) return 1;")
"if (error) return 77;")))
"if (error) return 77;"))
;; On MIPS, disable the 'test_parse' test, which assumes
;; that compilation is supported. As of orc-0.4.25,
;; compilation is not supported on MIPS.
,@(if (string-prefix? "mips" (%current-system))
'((substitute* "testsuite/test_parse.c"
(("return 1;") "return 77;")))
'()))
%standard-phases)))
(home-page "http://code.entropywave.com/orc/")
(synopsis "Oil runtime compiler")
@ -160,7 +168,10 @@ (define-public gst-plugins-base
`(("gstreamer" ,gstreamer))) ; required by gstreamer-plugins-base-1.0.pc
(inputs
`(("cdparanoia" ,cdparanoia)
("orc" ,orc)
,@(if (not (string-prefix? "mips" (or (%current-target-system)
(%current-system))))
`(("orc" ,orc))
'())
("pango" ,pango)
("libogg" ,libogg)
("libtheora" ,libtheora)
@ -225,7 +236,10 @@ (define-public gst-plugins-good
("libshout" ,libshout)
("libsoup" ,libsoup)
("libvpx" ,libvpx)
("orc" ,orc)
,@(if (not (string-prefix? "mips" (or (%current-target-system)
(%current-system))))
`(("orc" ,orc))
'())
("pulseaudio" ,pulseaudio)
("speex" ,speex)
("taglib" ,taglib)
@ -322,7 +336,10 @@ (define-public gst-plugins-bad
("openjpeg" ,openjpeg)
("openssl" ,openssl)
("opus" ,opus)
("orc" ,orc)
,@(if (not (string-prefix? "mips" (or (%current-target-system)
(%current-system))))
`(("orc" ,orc))
'())
("qt" ,qt)
("soundtouch" ,soundtouch)
("wayland" ,wayland)))
@ -359,7 +376,10 @@ (define-public gst-plugins-ugly
;; TODO:
;; * opencore-amr (for the AMR-NB decoder and encoder and the
;; AMR-WB decoder) <http://sourceforge.net/projects/opencore-amr/>
("orc" ,orc)))
,@(if (not (string-prefix? "mips" (or (%current-target-system)
(%current-system))))
`(("orc" ,orc))
'())))
(native-inputs
`(("glib:bin" ,glib "bin")
("pkg-config" ,pkg-config)
@ -399,7 +419,10 @@ (define-public gst-libav
(inputs
`(("gst-plugins-base" ,gst-plugins-base)
("ffmpeg" ,ffmpeg)
("orc" ,orc)
,@(if (not (string-prefix? "mips" (or (%current-target-system)
(%current-system))))
`(("orc" ,orc))
'())
("zlib" ,zlib)))
(home-page "http://gstreamer.freedesktop.org/")
(synopsis "Plugins for the GStreamer multimedia library")