02/03: gnu: Add allegro-4.

[David Thompson]

davexunit pushed a commit to branch master
in repository guix.

commit 154f6156c0b1f9c94e52871b68b4d16b3a0588ee
Author: David Thompson <address@hidden>
Date:   Fri Jan 29 16:08:12 2016 -0500

    gnu: Add allegro-4.
    
    * gnu/packages/game-development.scm (allegro-4): New variable.
---
 gnu/packages/game-development.scm |   39 +++++++++++++++++++++++++++++++++++++
 1 files changed, 39 insertions(+), 0 deletions(-)

diff --git a/gnu/packages/game-development.scm 
b/gnu/packages/game-development.scm
index 0274904..646fdc1 100644
--- a/gnu/packages/game-development.scm
+++ b/gnu/packages/game-development.scm
@@ -4,6 +4,7 @@
 ;;; Copyright © 2015 Julian Graham <address@hidden>
 ;;; Copyright © 2015 Ludovic Courtès <address@hidden>
 ;;; Copyright © 2015 Alex Kost <address@hidden>
+;;; Copyright © 2015, 2016 David Thompson <address@hidden>
 ;;;
 ;;; This file is part of GNU Guix.
 ;;;
@@ -295,3 +296,41 @@ archive on a per-file basis.")
 programming language.")
     (home-page "https://love2d.org/";)
     (license license:zlib)))
+
+(define-public allegro-4
+  (package
+    (name "allegro")
+    (version "4.4.2")
+    (source (origin
+              (method url-fetch)
+              (uri (string-append "http://download.gna.org/allegro/allegro/";
+                                  version "/allegro-" version ".tar.gz"))
+              (sha256
+               (base32
+                "1p0ghkmpc4kwij1z9rzxfv7adnpy4ayi0ifahlns1bdzgmbyf88v"))))
+    (build-system cmake-build-system)
+    (arguments
+     '(#:phases
+       (modify-phases %standard-phases
+         (add-after 'unpack 'patch-build-system
+           (lambda _
+             ;; Build addons as shared libraries.  Trying to set ADDON_LINKAGE
+             ;; via a command line option doesn't work because it is
+             ;; unconditionally clobbered in the build script.
+             (substitute* '("CMakeLists.txt")
+               (("ADDON_LINKAGE STATIC")
+                "ADDON_LINKAGE SHARED"))
+             #t)))))
+    (inputs
+     `(("glu" ,glu)
+       ("libpng" ,libpng)
+       ("libvorbis" ,libvorbis)
+       ("mesa" ,mesa)
+       ("zlib" ,zlib)))
+    (synopsis "Game programming library")
+    (description "Allegro is a library mainly aimed at video game and
+multimedia programming.  It handles common, low-level tasks such as creating
+windows, accepting user input, loading data, drawing images, playing sounds,
+etc.")
+    (home-page "http://liballeg.org";)
+    (license license:giftware)))