From d6bb375789821f4e4e175465f50e77e8a6b1aaf7 Mon Sep 17 00:00:00 2001
From: Alexander Nguyen <alexander.nguyen@stud.hfm-karlsruhe.de>
Date: Sun, 09 Mar 2025 18:42:11 +0100
Subject: [PATCH] feat: implemented encoding up to 7th order
---
sources/utilities.lisp | 2 +-
1 files changed, 1 insertions(+), 1 deletions(-)
diff --git a/sources/utilities.lisp b/sources/utilities.lisp
index 765656d..4f1b16f 100644
--- a/sources/utilities.lisp
+++ b/sources/utilities.lisp
@@ -366,7 +366,7 @@
for gainitem in (cdr subgainlist) do
(unless (< gainitem -150) ;it would be better to catch 'nil' instead of a very small value (depends on float precision)
(setf substr (string+ substr (format nil ",~dp~d" channelitem gainitem))))
- finally return substr)
+ finally (return substr))
)))))
outstr))
--
Gitblit v1.9.1