From e90a706e1686aaf3a1004683be8a3f3a4cbaf22e Mon Sep 17 00:00:00 2001
From: Efraim Flashner <efraim@flashner.co.il>
Date: Tue, 13 Dec 2016 10:04:11 +0200
Subject: [PATCH] gnu: libjpeg-turbo: Fix build on mips.

* gnu/packages/image.scm (libjpeg-turbo)[arguments]: Add substitution to
set variable type before use.
---
 gnu/packages/image.scm | 12 +++++++++++-
 1 file changed, 11 insertions(+), 1 deletion(-)

diff --git a/gnu/packages/image.scm b/gnu/packages/image.scm
index 4967f83ed91..7429e9b649f 100644
--- a/gnu/packages/image.scm
+++ b/gnu/packages/image.scm
@@ -1068,7 +1068,17 @@ (define-public libjpeg-turbo
     (native-inputs
      `(("nasm" ,nasm)))
     (arguments
-     `(#:test-target "test"))
+     '(#:test-target "test"
+       #:phases
+       (modify-phases %standard-phases
+         (add-after 'unpack 'set-env-on-MIPS
+           ;; This is borrowed from Debian's patchset for libjpeg
+           ;; https://sources.debian.net/data/main/libj/libjpeg-turbo/1:1.5.1-2/debian/patches/0001-Declare-env-on-MIPS-on-first-use-Courtesy-of-Aurelie.patch
+           (lambda _
+             (substitute* "simd/jsimd_mips.c"
+               (("env = getenv\\(\"JSIMD_FORCEDSPR2")
+                "char *env = getenv\(\"JSIMD_FORCEDSPR2"))
+             #t)))))
     (home-page "http://www.libjpeg-turbo.org/")
     (synopsis "SIMD-accelerated JPEG image handling library")
     (description "libjpeg-turbo is a JPEG image codec that accelerates baseline
-- 
GitLab