Subject: [PATCH] gnu: Add vl1-emulator

From: Alexandros Theodotou <[email-masked]>
Date: Fri, 20 Dec 2019 15:24:23 +0000

Hi,

This is a newly ported LV2 plugin. A release tag is planned for
January, so I am using a commit hash for now. I will change it to a tag
when it is released.

I have tested it and it works.

Thanks,
Alex
From cdbae63e3b00da87c2968e8f7c4876f8b708392c Mon Sep 17 00:00:00 2001
From: Alexandros Theodotou <[email-masked]>
Date: Fri, 20 Dec 2019 15:20:20 +0000
Subject: [PATCH] gnu: Add vl1-emulator.

* gnu/packages/music.scm (vl1-emulator): New variable.
---
 gnu/packages/music.scm | 44 ++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 44 insertions(+)

diff --git a/gnu/packages/music.scm b/gnu/packages/music.scm
index f80fb067e8..cc019b8c69 100644
--- a/gnu/packages/music.scm
+++ b/gnu/packages/music.scm
@@ -5106,3 +5106,47 @@ MIDI drums and comes as two separate drumkits: Black Pearl and Red Zeppelin.")
     (description "Helm is a cross-platform polyphonic synthesizer available standalone
 and as an LV2 plugin.")
     (license license:gpl3+)))
+
+(define-public vl1-emulator
+  (package
+    (name "vl1-emulator")
+    (version "0.0.0-1")
+    (source
+      (origin
+        (method git-fetch)
+        (uri (git-reference
+               (url "https://github.com/linuxmao-org/VL1-emulator.git")
+               (commit "defa85fea1574cea81cbe53a6ab4061a4a9a089e")
+               (recursive? #t))) ; for the DISTRHO plugin framework
+        (file-name (git-file-name name version))
+        (sha256
+         (base32
+          "1k5ig72silah5m9lnqwkn49hwkni1zkpz4y1nvnkg2a2ycwfqz53"))))
+    (build-system gnu-build-system)
+    (arguments
+     `(#:tests? #f ; no check target
+       #:make-flags
+       (list (string-append "DESTDIR=" (assoc-ref %outputs "out"))
+             (string-append "PREFIX="))
+       #:phases
+       (modify-phases %standard-phases
+         (add-before 'build 'set-CC-variable
+           (lambda _
+             (setenv "CC" "gcc")))
+         ;; no configure script
+         (delete 'configure))))
+    (inputs
+     `(("cairo" ,cairo)
+       ("jack" ,jack-1)
+       ("mesa" ,mesa)
+       ("libx11" ,libx11)))
+    (native-inputs
+     `(("pkg-config" ,pkg-config)
+       ("lv2" ,lv2)))
+    (home-page "https://github.com/brummer10/gxplugins.lv2")
+    (synopsis "Emulator of Casio VL-Tone VL1")
+    (description
+     "An emulator of Casio VL-Tone VL1, based on source code by PolyValens,
+offered as an LV2 plugin and a standalone JACK application.")
+    ;; Expat or CC0
+    (license (list license:expat license:cc0))))
-- 
2.24.1