From 4b0385f82a4010b40b58b331fc79c93bc6309ef4 Mon Sep 17 00:00:00 2001
From: Sughosha <sughosha@disroot.org>
Date: Sun, 24 Aug 2025 08:46:40 +0530
Subject: [PATCH] gnu: Add eel2.

* gnu/packages/cpp.scm (eel2): New variable.

Change-Id: I33626ba2480c754932614fb695884156b68cfea1
---
 gnu/packages/cpp.scm | 40 ++++++++++++++++++++++++++++++++++++++++
 1 file changed, 40 insertions(+)

diff --git a/gnu/packages/cpp.scm b/gnu/packages/cpp.scm
index 55655f926b274e44c996a7168c2a1a09f8dcad57..4bfaac6a7ec4b27b6476c95c66cde86584f50201 100644
--- a/gnu/packages/cpp.scm
+++ b/gnu/packages/cpp.scm
@@ -82,6 +82,7 @@
   #:use-module (guix gexp)
   #:use-module (gnu packages)
   #:use-module (gnu packages algebra)
+  #:use-module (gnu packages assembly)
   #:use-module (gnu packages audio)
   #:use-module (gnu packages autotools)
   #:use-module (gnu packages base)
@@ -3891,6 +3892,45 @@ features:
 @item Completely asynchronous love for single threaded apps.
 @end itemize")))
 
+(define-public eel2
+  (package
+    (inherit swell)
+    (name "eel2")
+    (arguments
+     (substitute-keyword-arguments (package-arguments swell)
+       ((#:tests? _ #t) #f) ;no tests
+       ;; FIXME: Remove this flag when this issue will be fixed:
+       ;; https://github.com/justinfrankel/WDL/issues/32.
+       ((#:make-flags _ '()) #~'("NO_GFX=1"))
+       ((#:phases phases)
+        #~(modify-phases #$phases
+            (replace 'change-directory
+              (lambda _ (chdir "WDL/eel2")))
+            (replace 'install
+              (lambda _
+                ;; Install executable files.
+                (for-each (lambda (file)
+                            (install-file file
+                                          (string-append #$output "/bin")))
+                          '("eel_pp" "loose_eel"))
+                ;; Install headers.
+                (for-each (lambda (file)
+                            (install-file file
+                                          (string-append #$output
+                                                         "/include/EEL2")))
+                            (find-files "." "\\.h$"))
+                ;; Install scripts.
+                (copy-recursively "scripts"
+                                  (string-append #$output
+                                                 "/share/EEL2/scripts"))))))))
+    (native-inputs (list nasm))
+    (inputs (list jnetlib))
+    (home-page "https://www.cockos.com/EEL2/")
+    (synopsis "Expression evaluation library")
+    (description
+     "EEL2 is an expression evaluation library and realtime compiler based on
+@uref{http://1014.org/code/nullsoft/avs/, AVS's EEL}.")))
+
 (define-public juce
   (package
     (name "juce")