me
/
guix
Archived
1
0
Fork 0
Code

gnu: dds: Update to 2.9.0-1.d2bc4c2. 

* gnu/packages/game-development.scm (dds): Update to 2.9.0-1.d2bc4c2.

Change-Id: I3c6db4e81d70112f020f2d7a0f7db26069c7591f
Signed-off-by: Liliana Marie Prikler <liliana.prikler@gmail.com>
master
Nicolas Goaziou 2023-12-31 15:08:45 +01:00 committed by Liliana Marie Prikler
parent 11136fb0ad
commit 3b4e71c473
No known key found for this signature in database
GPG Key ID: 442A84B8C70E2F87
1 changed files with 63 additions and 61 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

124
gnu/packages/game-development.scm
View File

@ -196,69 +196,71 @@ is used in some video games and movies.")
(license license:zlib))) (license license:zlib)))
(define-public dds (define-public dds
(package (let ((commit "d2bc4c2c703941664fc1d73e69caa5233cdeac18")
(name "dds") (revision "1"))
(version "2.9.0") (package
(source (name "dds")
(origin (version (git-version "2.9.0" revision commit))
(method git-fetch) (source
(uri (git-reference (origin
(url "https://github.com/dds-bridge/dds") (method git-fetch)
(commit (string-append "v" version)))) (uri (git-reference
(file-name (git-file-name name version)) (url "https://github.com/dds-bridge/dds")
(sha256 (commit commit)))
(base32 (file-name (git-file-name name version))
"1iv09qic43nvla02lm8zgnkqpjgnc95p8zh3wyifmnmlh1rz02yj")))) (sha256
(build-system gnu-build-system) (base32
(arguments "1ishbb69cvyv96xdxshnly0m5ydwljgdf8fwa1cr9rj2qj40q4rm"))))
(list #:phases (build-system gnu-build-system)
#~(modify-phases %standard-phases (arguments
(add-after 'unpack 'chdir (list #:phases
(lambda _ #~(modify-phases %standard-phases
(chdir "src"))) (add-after 'unpack 'chdir
(replace 'configure (lambda _
;; Configuration is done by copying the appropriate (chdir "src")))
;; make file in the working directory. There is no (replace 'configure
;; configure script. ;; Configuration is done by copying the appropriate
(lambda _ ;; make file in the working directory. There is no
(copy-file "Makefiles/Makefile_linux_shared" ;; configure script.
"Makefile"))) (lambda _
(replace 'check (copy-file "Makefiles/Makefile_linux_shared"
;; There is no "check" traget. We must compile "Makefile")))
;; a "dtest" program and apply it on a data set. (replace 'check
(lambda* (#:key tests? #:allow-other-keys) ;; There is no "check" traget. We must compile
(when tests? ;; a "dtest" program and apply it on a data set.
(install-file "libdds.so" "../test") (lambda* (#:key tests? #:allow-other-keys)
(with-directory-excursion "../test" (when tests?
(copy-file "Makefiles/Makefile_linux" (install-file "libdds.so" "../test")
"Makefile") (with-directory-excursion "../test"
(substitute* "Makefile" (copy-file "Makefiles/Makefile_linux"
(("-Werror") "")) "Makefile")
(invoke "make") (substitute* "Makefile"
(invoke "./dtest" "-f" "../hands/list100.txt"))))) (("-Werror") ""))
(replace 'install (invoke "make")
;; "install" target merely moves ".so" file around (invoke "./dtest" "-f" "../hands/list100.txt")))))
;; the source directory. We install it in the store, (replace 'install
;; along with all shipped documentation (which cannot ;; "install" target merely moves ".so" file around
;; be built from source unfortunately). ;; the source directory. We install it in the store,
(lambda _ ;; along with all shipped documentation (which cannot
(install-file "libdds.so" ;; be built from source unfortunately).
(string-append #$output "/lib")) (lambda _
(let ((doc (string-append #$output (install-file "libdds.so"
"/share/doc/" (string-append #$output "/lib"))
#$name "-" #$version))) (let ((doc (string-append #$output
(install-file "../LICENSE" doc) "/share/doc/"
(copy-recursively "../doc" doc))))))) #$name "-" #$version)))
(native-inputs (install-file "../LICENSE" doc)
(list gawk procps)) (copy-recursively "../doc" doc)))))))
(inputs (native-inputs
(list boost)) (list gawk procps))
(home-page "https://privat.bahnhof.se/wb758135/") (inputs
(synopsis "Double dummy solver for the bridge card game") (list boost))
(description "DDS is a double-dummy solver of bridge hands. It supports (home-page "https://privat.bahnhof.se/wb758135/")
(synopsis "Double dummy solver for the bridge card game")
(description "DDS is a double-dummy solver of bridge hands. It supports
single-threading and multi-threading for improved performance. DDS single-threading and multi-threading for improved performance. DDS
offers a wide range of functions, including par-score calculations.") offers a wide range of functions, including par-score calculations.")
(license license:asl2.0))) (license license:asl2.0))))
(define-public deutex (define-public deutex
(package (package