mirror/guix
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/guix.git synced 2025-02-07 11:29:59 +01:00
Code Issues Projects Releases Packages Wiki Activity Actions

gnu: Add soundtouch-1/integer-samples.

Browse source 
* gnu/packages/audio.scm (soundtouch-1/integer-samples): New variable.

Change-Id: Iea6e1313f2c7189ded9abf100f07ed530793f9f0
Reviewed-by: Sou Bunnbu (宋文武) <iyzsong@member.fsf.org>
This commit is contained in:
Maxim Cournoyer 2025-01-14 17:50:43 +09:00
parent a895cc4c5b
commit 9ad90f5491
No known key found for this signature in database
GPG key ID: 1260E46482E63562
1 changed files with 25 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

26
gnu/packages/audio.scm
View file

@ -11,7 +11,7 @@
;;; Copyright © 2016–2023 Tobias Geerinckx-Rice <me@tobias.gr>
;;; Copyright © 2018, 2020, 2024 Oleg Pykhalov <go.wigust@gmail.com>
;;; Copyright © 2018 okapi <okapi@firemail.cc>
;;; Copyright © 2018, 2020, 2022, 2023, 2024 Maxim Cournoyer <maxim.cournoyer@gmail.com>
;;; Copyright © 2018, 2020, 2022-2025 Maxim Cournoyer <maxim.cournoyer@gmail.com>
;;; Copyright © 2018 Clément Lassieur <clement@lassieur.org>
;;; Copyright © 2018 Brett Gilio <brettg@gnu.org>
;;; Copyright © 2018, 2019, 2022 Marius Bakke <marius@gnu.org>
@ -4409,6 +4409,30 @@ application developers writing sound processing tools that require tempo/pitch
control functionality, or just for playing around with the sound effects.")
(license license:lgpl2.1+)))
(define-public soundtouch-1/integer-samples
(package
(inherit soundtouch)
(name "soundtouch")
(version "1.9.2")
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://gitlab.com/soundtouch/soundtouch.git")
(commit (string-append name "-" version))))
(file-name (git-file-name name version))
(sha256
(base32 "1ir961w5gz86cm6yivr1ypi6n2y52vn319gy2gvdkkbbz5wyjkrq"))))
(arguments
;; Dolphin expects the samples to be of the integer type.
(list #:configure-flags #~(list "--enable-integer-samples")
#:phases #~(modify-phases %standard-phases
(replace 'bootstrap
(lambda _
;; Avoid the bootstrap script, which has a broken
;; shebang.
(invoke "autoreconf" "-vif"))))))))
(define-public stargate-soundtouch
;; Stargate's fork of soundtouch.
(let ((commit "464f474c0be5d7e0970909dd30593012e4621468")