From f3e3b20c9bce4a635d3b7a99bc1f02e4310e516b Mon Sep 17 00:00:00 2001
From: Lorenz Lehmann <lorenz.lehmann@students.muho-mannheim.de>
Date: Mon, 12 Feb 2024 08:45:22 +0100
Subject: [PATCH] fix (sources): change operators
---
OM-Lead.lisp | 6 +++---
1 files changed, 3 insertions(+), 3 deletions(-)
diff --git a/OM-Lead.lisp b/OM-Lead.lisp
index 1295c0e..dca737f 100644
--- a/OM-Lead.lisp
+++ b/OM-Lead.lisp
@@ -22,8 +22,8 @@
:name name))
(defvar *OMLead-files* nil)
-(setf *OMLead-files* '("harmon-database"
- "harmon-progress"
+(setf *OMLead-files* '("gen-harmonies"
+ "gen-sequence"
"get-score"
"harmon-rhythm"
))
@@ -42,7 +42,7 @@
;--------------------------------------------------
(defvar *svppackages-list* nil)
(setf *subpackages-list*
- '((Nil Nil Nil (omlead::harmon-database omlead::harmon-progress omlead::get-score omlead::harmon-rhythm) Nil)))
+ '((Nil Nil Nil (omlead::gen-harmonies omlead::gen-sequence omlead::get-score omlead::harmon-rhythm) Nil)))
;--------------------------------------------------
;filling packages
--
Gitblit v1.9.1