[Morphologie-devel] bug in midicents-to-name

[Kilian Sprotte]

Hi again,

> (morph:mc->alpha 6300 2) gives me
> "ES4"

there was a small typo - I changed ES to DS:

--- src/morphologie.lisp        (revision 24)
+++ src/morphologie.lisp        (working copy)
@@ -601,7 +601,7 @@
                    "~D~D"
                    (nth note-number
                         '("C" "CN+" "CS--" "CS-" "CS" "CS+" "CS++" "DN-" "D"
-                          "DN+" "DS--" "DS-" "ES" "DS+" "DS++" "EN-" "E" "EN+"
+                          "DN+" "DS--" "DS-" "DS" "DS+" "DS++" "EN-" "E" "EN+"
                           "ES--" "ES-" "F" "FN+" "FS--" "FS-" "FS" "FS+" "FS++"
                           "GN-" "G" "GN+" "GS--" "GS-" "GS" "GS+" "GS++" "AN-"
                           "A" "AN+" "AS--" "AS-" "BF" "AS+" "AS++" "BN-" "B"

Cheers,
  Kilian