Re: Need help porting eDuke32

[HiPhish <hiphish@posteo.de>]

[-- Attachment #1: Type: text/plain, Size: 2286 bytes --]

On Sunday, 17 February 2019 16:33:41 CET you wrote:
> Can you share your package definition?

Sure, I posted the abridged version in the OP, here is the complete definition:

(define-public eduke32
  (package
    (name "eduke32")
    (version "20181027-7136")
    (source
      (origin
        (method url-fetch)
        (uri (string-append "http://dukeworld.duke4.net/eduke32/synthesis/"
                            version
                            "/eduke32_src_"
                            version
                            ".tar.xz"))
        (sha256
          (base32 "121k2k7ylw8dvs71mrdy7hwb1a2xd5di7jdqc20a1ml5k0n9akpn"))))
    (build-system gnu-build-system)
    (arguments
      `(#:tests? #f
        #:phases
        (modify-phases %standard-phases
          (delete 'configure)
          (delete 'install))))
    (native-inputs
      `(("pkg-config" ,pkg-config)))
    (inputs
      `(("sdl-union" ,(sdl-union (list sdl2 sdl2-mixer)))
        ("glu" ,glu)
        ("libvorbis" ,libvorbis)
        ("libvpx" ,libvpx)
        ("flac" ,flac)
        ("gtk+" ,gtk+-2)))
    (synopsis "Source port of the classic PC first person shooter Duke Nukem 
3D")
    (description "EDuke32 is an awesome, free homebrew game engine and source 
port of the
classic PC first person shooter Duke Nukem 3D—Duke3D for short—to Windows,
Linux, Mac OS X, FreeBSD, several handhelds, your family toaster, and to your
girlfriend's vibrator. We've added thousands of cool and useful features and
upgrades for regular players and additional editing capabilities and scripting
extensions for homebrew developers and mod creators. EDuke32 is open source
software that is completely free to use for all non-commercial purposes.")
    (home-page "http://eduke32.com/")
    (license (list gpl2))))


> Are you running those two commands from the build environment?

Yes, from within the same build environment. I executed `guix environment --
pure --load=eduke32.scm` from within the source code directory and ran the 
commands in the new shell. If I understand the user manual correctly, this 
should set up an environment in which all dependencies (inputs) declared in 
the package definition are set up, and nothing else. Is this correct?

[-- Attachment #2: eduke32.scm --]
[-- Type: text/x-scheme, Size: 2569 bytes --]

#!/usr/local/bin/guile
!#

(define-module (games eduke32)
  #:use-module ((guix packages)
                #:select (package origin base32))
  #:use-module ((guix download)
                #:select (url-fetch))
  #:use-module ((guix licenses) #:select (gpl2))
  #:use-module ((guix build-system gnu) #:select (gnu-build-system))
  #:use-module ((guix build-system trivial) #:select (trivial-build-system))
  ;; Inputs
  #:use-module ((gnu packages sdl)
                #:select (sdl-union sdl2 sdl2-mixer))
  #:use-module ((gnu packages gl)
                #:select (glu))
  #:use-module ((gnu packages pkg-config)
                #:select (pkg-config))
  #:use-module ((gnu packages xiph)
                #:select (libvorbis flac))
  #:use-module ((gnu packages video)
                #:select (libvpx))
  #:use-module ((gnu packages gtk)
                #:select (gtk+-2)))


(define-public eduke32
  (package
    (name "eduke32")
    (version "20181027-7136")
    (source
      (origin
        (method url-fetch)
        (uri (string-append "http://dukeworld.duke4.net/eduke32/synthesis/"
                            version
                            "/eduke32_src_"
                            version
                            ".tar.xz"))
        (sha256
          (base32 "121k2k7ylw8dvs71mrdy7hwb1a2xd5di7jdqc20a1ml5k0n9akpn"))))
    (build-system gnu-build-system)
    (arguments
      `(#:tests? #f
        #:phases
        (modify-phases %standard-phases
          (delete 'configure)
          (delete 'install))))
    (native-inputs
      `(("pkg-config" ,pkg-config)))
    (inputs
      `(("sdl-union" ,(sdl-union (list sdl2 sdl2-mixer)))
        ("glu" ,glu)
        ("libvorbis" ,libvorbis)
        ("libvpx" ,libvpx)
        ("flac" ,flac)
        ("gtk+" ,gtk+-2)))
    (synopsis "Source port of the classic PC first person shooter Duke Nukem 3D")
    (description "EDuke32 is an awesome, free homebrew game engine and source port of the
classic PC first person shooter Duke Nukem 3D—Duke3D for short—to Windows,
Linux, Mac OS X, FreeBSD, several handhelds, your family toaster, and to your
girlfriend's vibrator. We've added thousands of cool and useful features and
upgrades for regular players and additional editing capabilities and scripting
extensions for homebrew developers and mod creators. EDuke32 is open source
software that is completely free to use for all non-commercial purposes.")
    (home-page "http://eduke32.com/")
    (license (list gpl2))))
    
eduke32