diff --git a/doc/robodoc/activity-levels-env_lsp.html b/doc/robodoc/activity-levels-env_lsp.html index d23361ef..07b26bcd 100755 --- a/doc/robodoc/activity-levels-env_lsp.html +++ b/doc/robodoc/activity-levels-env_lsp.html @@ -23,7 +23,6 @@ Table of Contents Sourcefiles Index -Metadata Global Parameters Classes Functions @@ -154,7 +153,7 @@ diff --git a/doc/robodoc/activity-levels-pc_lsp.html b/doc/robodoc/activity-levels-pc_lsp.html index 54974d69..9decf5ed 100644 --- a/doc/robodoc/activity-levels-pc_lsp.html +++ b/doc/robodoc/activity-levels-pc_lsp.html @@ -23,7 +23,6 @@ Table of Contents Sourcefiles Index -Metadata Global Parameters Classes Functions @@ -100,7 +99,7 @@ diff --git a/doc/robodoc/activity-levels_lsp.html b/doc/robodoc/activity-levels_lsp.html index acf4b9a4..c740d45c 100755 --- a/doc/robodoc/activity-levels_lsp.html +++ b/doc/robodoc/activity-levels_lsp.html @@ -23,7 +23,6 @@ Table of Contents Sourcefiles Index -Metadata Global Parameters Classes Functions @@ -209,7 +208,7 @@ diff --git a/doc/robodoc/afu_lsp.html b/doc/robodoc/afu_lsp.html index b7b4b2c0..0bc8cb3c 100644 --- a/doc/robodoc/afu_lsp.html +++ b/doc/robodoc/afu_lsp.html @@ -23,7 +23,6 @@ Table of Contents Sourcefiles Index -Metadata Global Parameters Classes Functions @@ -228,7 +227,7 @@ diff --git a/doc/robodoc/akoustik-piano-spectra_lsp.html b/doc/robodoc/akoustik-piano-spectra_lsp.html index 80b94139..02f6cece 100755 --- a/doc/robodoc/akoustik-piano-spectra_lsp.html +++ b/doc/robodoc/akoustik-piano-spectra_lsp.html @@ -23,7 +23,6 @@ Table of Contents Sourcefiles Index -Metadata Global Parameters Classes Functions @@ -64,7 +63,7 @@ diff --git a/doc/robodoc/all_lsp.html b/doc/robodoc/all_lsp.html index 85f17759..2e44ffbf 100755 --- a/doc/robodoc/all_lsp.html +++ b/doc/robodoc/all_lsp.html @@ -23,7 +23,6 @@ Table of Contents Sourcefiles Index -Metadata Global Parameters Classes Functions @@ -57,7 +56,7 @@ diff --git a/doc/robodoc/assoc-list_lsp.html b/doc/robodoc/assoc-list_lsp.html index 4e42e570..c68823c1 100755 --- a/doc/robodoc/assoc-list_lsp.html +++ b/doc/robodoc/assoc-list_lsp.html @@ -23,7 +23,6 @@ Table of Contents Sourcefiles Index -Metadata Global Parameters Classes Functions @@ -832,7 +831,7 @@ diff --git a/doc/robodoc/bar-holder_lsp.html b/doc/robodoc/bar-holder_lsp.html index 41940e3a..96497874 100755 --- a/doc/robodoc/bar-holder_lsp.html +++ b/doc/robodoc/bar-holder_lsp.html @@ -23,7 +23,6 @@ Table of Contents Sourcefiles Index -Metadata Global Parameters Classes Functions @@ -293,7 +292,7 @@ diff --git a/doc/robodoc/change-data_lsp.html b/doc/robodoc/change-data_lsp.html index f469939a..67741c5b 100755 --- a/doc/robodoc/change-data_lsp.html +++ b/doc/robodoc/change-data_lsp.html @@ -23,7 +23,6 @@ Table of Contents Sourcefiles Index -Metadata Global Parameters Classes Functions @@ -160,7 +159,7 @@ diff --git a/doc/robodoc/change-map_lsp.html b/doc/robodoc/change-map_lsp.html index a12f234d..f5dd03b2 100755 --- a/doc/robodoc/change-map_lsp.html +++ b/doc/robodoc/change-map_lsp.html @@ -23,7 +23,6 @@ Table of Contents Sourcefiles Index -Metadata Global Parameters Classes Functions @@ -245,7 +244,7 @@ diff --git a/doc/robodoc/chord_lsp.html b/doc/robodoc/chord_lsp.html index 8f99f146..0aac057e 100755 --- a/doc/robodoc/chord_lsp.html +++ b/doc/robodoc/chord_lsp.html @@ -23,7 +23,6 @@ Table of Contents Sourcefiles Index -Metadata Global Parameters Classes Functions @@ -1911,7 +1910,7 @@ diff --git a/doc/robodoc/circular-sclist_lsp.html b/doc/robodoc/circular-sclist_lsp.html index c99e4dd4..b6228ac0 100755 --- a/doc/robodoc/circular-sclist_lsp.html +++ b/doc/robodoc/circular-sclist_lsp.html @@ -23,7 +23,6 @@ Table of Contents Sourcefiles Index -Metadata Global Parameters Classes Functions @@ -313,7 +312,7 @@ diff --git a/doc/robodoc/clm-piano-spectra_lsp.html b/doc/robodoc/clm-piano-spectra_lsp.html index 8cd7609b..7ae3a07d 100755 --- a/doc/robodoc/clm-piano-spectra_lsp.html +++ b/doc/robodoc/clm-piano-spectra_lsp.html @@ -23,7 +23,6 @@ Table of Contents Sourcefiles Index -Metadata Global Parameters Classes Functions @@ -64,7 +63,7 @@ diff --git a/doc/robodoc/clm_lsp.html b/doc/robodoc/clm_lsp.html index cddaa435..4fc4d147 100755 --- a/doc/robodoc/clm_lsp.html +++ b/doc/robodoc/clm_lsp.html @@ -23,7 +23,6 @@ Table of Contents Sourcefiles Index -Metadata Global Parameters Classes Functions @@ -377,7 +376,7 @@ diff --git a/doc/robodoc/cm-cm_lsp.html b/doc/robodoc/cm-cm_lsp.html index bb5a2ff7..0c4ea8ab 100644 --- a/doc/robodoc/cm-cm_lsp.html +++ b/doc/robodoc/cm-cm_lsp.html @@ -23,7 +23,6 @@ Table of Contents Sourcefiles Index -Metadata Global Parameters Classes Functions @@ -174,7 +173,7 @@ diff --git a/doc/robodoc/cm-load_lsp.html b/doc/robodoc/cm-load_lsp.html index 3bfa6e67..2a41d5bf 100755 --- a/doc/robodoc/cm-load_lsp.html +++ b/doc/robodoc/cm-load_lsp.html @@ -23,7 +23,6 @@ Table of Contents Sourcefiles Index -Metadata Global Parameters Classes Functions @@ -63,7 +62,7 @@ diff --git a/doc/robodoc/cm_lsp.html b/doc/robodoc/cm_lsp.html index 81e70ce9..da6ff325 100755 --- a/doc/robodoc/cm_lsp.html +++ b/doc/robodoc/cm_lsp.html @@ -23,7 +23,6 @@ Table of Contents Sourcefiles Index -Metadata Global Parameters Classes Functions @@ -670,7 +669,7 @@ diff --git a/doc/robodoc/cmn-glyphs_lsp.html b/doc/robodoc/cmn-glyphs_lsp.html index d0320926..351f0ee7 100755 --- a/doc/robodoc/cmn-glyphs_lsp.html +++ b/doc/robodoc/cmn-glyphs_lsp.html @@ -23,7 +23,6 @@ Table of Contents Sourcefiles Index -Metadata Global Parameters Classes Functions @@ -61,7 +60,7 @@ diff --git a/doc/robodoc/cmn_lsp.html b/doc/robodoc/cmn_lsp.html index 442d9dd5..a11f4f79 100755 --- a/doc/robodoc/cmn_lsp.html +++ b/doc/robodoc/cmn_lsp.html @@ -23,7 +23,6 @@ Table of Contents Sourcefiles Index -Metadata Global Parameters Classes Functions @@ -61,7 +60,7 @@ diff --git a/doc/robodoc/complete-set_lsp.html b/doc/robodoc/complete-set_lsp.html index 74959f63..fc0746ad 100755 --- a/doc/robodoc/complete-set_lsp.html +++ b/doc/robodoc/complete-set_lsp.html @@ -23,7 +23,6 @@ Table of Contents Sourcefiles Index -Metadata Global Parameters Classes Functions @@ -197,7 +196,7 @@ diff --git a/doc/robodoc/control-wave-ins_lsp.html b/doc/robodoc/control-wave-ins_lsp.html index 77380488..58a62d49 100644 --- a/doc/robodoc/control-wave-ins_lsp.html +++ b/doc/robodoc/control-wave-ins_lsp.html @@ -23,7 +23,6 @@ Table of Contents Sourcefiles Index -Metadata Global Parameters Classes Functions @@ -63,7 +62,7 @@ diff --git a/doc/robodoc/control-wave_lsp.html b/doc/robodoc/control-wave_lsp.html index 419e87e7..aa2c0d36 100755 --- a/doc/robodoc/control-wave_lsp.html +++ b/doc/robodoc/control-wave_lsp.html @@ -23,7 +23,6 @@ Table of Contents Sourcefiles Index -Metadata Global Parameters Classes Functions @@ -62,7 +61,7 @@ diff --git a/doc/robodoc/cycle-repeats_lsp.html b/doc/robodoc/cycle-repeats_lsp.html index f488f771..38413ee6 100755 --- a/doc/robodoc/cycle-repeats_lsp.html +++ b/doc/robodoc/cycle-repeats_lsp.html @@ -23,7 +23,6 @@ Table of Contents Sourcefiles Index -Metadata Global Parameters Classes Functions @@ -61,7 +60,7 @@ diff --git a/doc/robodoc/emacs/utilities_lsp.html b/doc/robodoc/emacs/utilities_lsp.html index 2d9a6bc2..72641010 100644 --- a/doc/robodoc/emacs/utilities_lsp.html +++ b/doc/robodoc/emacs/utilities_lsp.html @@ -19,7 +19,6 @@ Table of Contents Sourcefiles Index -Metadata Global Parameters Classes Functions @@ -77,7 +76,7 @@ diff --git a/doc/robodoc/ensemble_lsp.html b/doc/robodoc/ensemble_lsp.html index c7ee3862..3f0a7aca 100755 --- a/doc/robodoc/ensemble_lsp.html +++ b/doc/robodoc/ensemble_lsp.html @@ -23,7 +23,6 @@ Table of Contents Sourcefiles Index -Metadata Global Parameters Classes Functions @@ -645,7 +644,7 @@ diff --git a/doc/robodoc/event_lsp.html b/doc/robodoc/event_lsp.html index fe928933..9b9491a1 100755 --- a/doc/robodoc/event_lsp.html +++ b/doc/robodoc/event_lsp.html @@ -23,7 +23,6 @@ Table of Contents Sourcefiles Index -Metadata Global Parameters Classes Functions @@ -3189,7 +3188,7 @@ diff --git a/doc/robodoc/export-symbols_lsp.html b/doc/robodoc/export-symbols_lsp.html index 850d04b6..6658395a 100644 --- a/doc/robodoc/export-symbols_lsp.html +++ b/doc/robodoc/export-symbols_lsp.html @@ -23,7 +23,6 @@ Table of Contents Sourcefiles Index -Metadata Global Parameters Classes Functions @@ -56,7 +55,7 @@ diff --git a/doc/robodoc/get-spectrum_lsp.html b/doc/robodoc/get-spectrum_lsp.html index 1e2fff23..bc1b99a2 100755 --- a/doc/robodoc/get-spectrum_lsp.html +++ b/doc/robodoc/get-spectrum_lsp.html @@ -23,7 +23,6 @@ Table of Contents Sourcefiles Index -Metadata Global Parameters Classes Functions @@ -80,7 +79,7 @@ diff --git a/doc/robodoc/globals_lsp.html b/doc/robodoc/globals_lsp.html index d4196631..2ddcb4c9 100755 --- a/doc/robodoc/globals_lsp.html +++ b/doc/robodoc/globals_lsp.html @@ -23,7 +23,6 @@ Table of Contents Sourcefiles Index -Metadata Global Parameters Classes Functions @@ -231,7 +230,7 @@ diff --git a/doc/robodoc/instrument-change-map_lsp.html b/doc/robodoc/instrument-change-map_lsp.html index 7f61db74..f17d65d2 100755 --- a/doc/robodoc/instrument-change-map_lsp.html +++ b/doc/robodoc/instrument-change-map_lsp.html @@ -23,7 +23,6 @@ Table of Contents Sourcefiles Index -Metadata Global Parameters Classes Functions @@ -230,7 +229,7 @@ diff --git a/doc/robodoc/instrument-palette_lsp.html b/doc/robodoc/instrument-palette_lsp.html index 4d9b8249..51f6da16 100755 --- a/doc/robodoc/instrument-palette_lsp.html +++ b/doc/robodoc/instrument-palette_lsp.html @@ -23,7 +23,6 @@ Table of Contents Sourcefiles Index -Metadata Global Parameters Classes Functions @@ -252,7 +251,7 @@ diff --git a/doc/robodoc/instrument_lsp.html b/doc/robodoc/instrument_lsp.html index f5cce0e6..c6ff2518 100755 --- a/doc/robodoc/instrument_lsp.html +++ b/doc/robodoc/instrument_lsp.html @@ -23,7 +23,6 @@ Table of Contents Sourcefiles Index -Metadata Global Parameters Classes Functions @@ -792,14 +791,14 @@ Creation date: 4th September 2001 - $$ Last modified: 15:54:44 Sat Mar 16 2024 CET + $$ Last modified: 11:08:27 Wed Jul 17 2024 CEST SVN ID: $Id$ diff --git a/doc/robodoc/instruments_lsp.html b/doc/robodoc/instruments_lsp.html index 65b60533..2a275b80 100755 --- a/doc/robodoc/instruments_lsp.html +++ b/doc/robodoc/instruments_lsp.html @@ -23,7 +23,6 @@ Table of Contents Sourcefiles Index -Metadata Global Parameters Classes Functions @@ -54,7 +53,7 @@ Creation date: 30th December 2010 - $$ Last modified: 22:04:42 Tue Dec 19 2023 CET + $$ Last modified: 20:10:53 Mon Jul 15 2024 CEST SVN ID: $Id$ @@ -564,7 +563,7 @@ (:staff-name "double bass" :staff-short-name "db" :lowest-written e2 :highest-written g5 :transposition-semitones -12 :prefers-notes low - :largest-fast-leap 10 + :largest-fast-leap 8 ; 10 :clefs (bass tenor treble) :starting-clef bass :chords nil :microtones t :harmonics t @@ -983,7 +982,7 @@ diff --git a/doc/robodoc/intervals-mapper_lsp.html b/doc/robodoc/intervals-mapper_lsp.html index d2bcf985..fcc8d54f 100755 --- a/doc/robodoc/intervals-mapper_lsp.html +++ b/doc/robodoc/intervals-mapper_lsp.html @@ -23,7 +23,6 @@ Table of Contents Sourcefiles Index -Metadata Global Parameters Classes Functions @@ -371,7 +370,7 @@ diff --git a/doc/robodoc/l-for-lookup_lsp.html b/doc/robodoc/l-for-lookup_lsp.html index 0331f669..6dcc8eaf 100755 --- a/doc/robodoc/l-for-lookup_lsp.html +++ b/doc/robodoc/l-for-lookup_lsp.html @@ -23,7 +23,6 @@ Table of Contents Sourcefiles Index -Metadata Global Parameters Classes Functions @@ -986,7 +985,7 @@ diff --git a/doc/robodoc/lilypond_lsp.html b/doc/robodoc/lilypond_lsp.html index b8ac3e0a..8020e610 100755 --- a/doc/robodoc/lilypond_lsp.html +++ b/doc/robodoc/lilypond_lsp.html @@ -23,7 +23,6 @@ Table of Contents Sourcefiles Index -Metadata Global Parameters Classes Functions @@ -311,7 +310,7 @@ diff --git a/doc/robodoc/linked-named-object_lsp.html b/doc/robodoc/linked-named-object_lsp.html index 9786268f..fd9aa4da 100755 --- a/doc/robodoc/linked-named-object_lsp.html +++ b/doc/robodoc/linked-named-object_lsp.html @@ -23,7 +23,6 @@ Table of Contents Sourcefiles Index -Metadata Global Parameters Classes Functions @@ -61,7 +60,7 @@ diff --git a/doc/robodoc/music-xml_lsp.html b/doc/robodoc/music-xml_lsp.html index 5000bd3d..9af9bd8b 100755 --- a/doc/robodoc/music-xml_lsp.html +++ b/doc/robodoc/music-xml_lsp.html @@ -23,7 +23,6 @@ Table of Contents Sourcefiles Index -Metadata Global Parameters Classes Functions @@ -299,7 +298,7 @@ diff --git a/doc/robodoc/named-object_lsp.html b/doc/robodoc/named-object_lsp.html index f9b1be74..12dc4dd2 100755 --- a/doc/robodoc/named-object_lsp.html +++ b/doc/robodoc/named-object_lsp.html @@ -23,7 +23,6 @@ Table of Contents Sourcefiles Index -Metadata Global Parameters Classes Functions @@ -74,7 +73,7 @@ diff --git a/doc/robodoc/osc-sc_lsp.html b/doc/robodoc/osc-sc_lsp.html index 8c3f0d62..1058eb69 100755 --- a/doc/robodoc/osc-sc_lsp.html +++ b/doc/robodoc/osc-sc_lsp.html @@ -23,7 +23,6 @@ Table of Contents Sourcefiles Index -Metadata Global Parameters Classes Functions @@ -92,7 +91,7 @@ diff --git a/doc/robodoc/package_lsp.html b/doc/robodoc/package_lsp.html index e524d44d..bcb8462b 100755 --- a/doc/robodoc/package_lsp.html +++ b/doc/robodoc/package_lsp.html @@ -23,7 +23,6 @@ Table of Contents Sourcefiles Index -Metadata Global Parameters Classes Functions @@ -39,7 +38,7 @@ diff --git a/doc/robodoc/palette_lsp.html b/doc/robodoc/palette_lsp.html index 5cadbd48..eb0c389c 100755 --- a/doc/robodoc/palette_lsp.html +++ b/doc/robodoc/palette_lsp.html @@ -23,7 +23,6 @@ Table of Contents Sourcefiles Index -Metadata Global Parameters Classes Functions @@ -64,7 +63,7 @@ diff --git a/doc/robodoc/permutations_lsp.html b/doc/robodoc/permutations_lsp.html index 0f567144..437b7f59 100755 --- a/doc/robodoc/permutations_lsp.html +++ b/doc/robodoc/permutations_lsp.html @@ -23,7 +23,6 @@ Table of Contents Sourcefiles Index -Metadata Global Parameters Classes Functions @@ -754,7 +753,7 @@ diff --git a/doc/robodoc/piece_lsp.html b/doc/robodoc/piece_lsp.html index f1caac8d..f0025db1 100755 --- a/doc/robodoc/piece_lsp.html +++ b/doc/robodoc/piece_lsp.html @@ -23,7 +23,6 @@ Table of Contents Sourcefiles Index -Metadata Global Parameters Classes Functions @@ -441,7 +440,7 @@ diff --git a/doc/robodoc/pitch-seq-palette_lsp.html b/doc/robodoc/pitch-seq-palette_lsp.html index 27f6f901..506045f1 100755 --- a/doc/robodoc/pitch-seq-palette_lsp.html +++ b/doc/robodoc/pitch-seq-palette_lsp.html @@ -23,7 +23,6 @@ Table of Contents Sourcefiles Index -Metadata Global Parameters Classes Functions @@ -289,7 +288,7 @@ diff --git a/doc/robodoc/pitch-seq_lsp.html b/doc/robodoc/pitch-seq_lsp.html index 4614cb98..71b7b281 100755 --- a/doc/robodoc/pitch-seq_lsp.html +++ b/doc/robodoc/pitch-seq_lsp.html @@ -23,7 +23,6 @@ Table of Contents Sourcefiles Index -Metadata Global Parameters Classes Functions @@ -279,7 +278,7 @@ diff --git a/doc/robodoc/pitch_lsp.html b/doc/robodoc/pitch_lsp.html index 1f5cfa67..eb13f4d2 100755 --- a/doc/robodoc/pitch_lsp.html +++ b/doc/robodoc/pitch_lsp.html @@ -23,7 +23,6 @@ Table of Contents Sourcefiles Index -Metadata Global Parameters Classes Functions @@ -102,7 +101,7 @@ Creation date: March 18th 2001 - $$ Last modified: 12:26:25 Wed Aug 30 2023 CEST + $$ Last modified: 11:42:21 Sat Jul 20 2024 CEST SVN ID: $Id$ @@ -733,9 +732,9 @@ -

pitch/no-accidental [ Metadata ]

+

pitch/no-accidental [ Methods ]

-

[ Top ] [ pitch ] [ Metadata ]

+

[ Top ] [ pitch ] [ Methods ]

DESCRIPTION

 Set the SHOW-ACCIDENTAL and ACCIDENTAL-IN-PARENTHESES slots of a specified
  pitch object to NIL, preventing any accidentals or accidentals in
@@ -2612,7 +2611,7 @@
 
  
  
 
 
diff --git a/doc/robodoc/player-section_lsp.html b/doc/robodoc/player-section_lsp.html
index efe63b81..98d7ba46 100755
--- a/doc/robodoc/player-section_lsp.html
+++ b/doc/robodoc/player-section_lsp.html
@@ -23,7 +23,6 @@
 Table of Contents
 Sourcefiles
 Index
-Metadata
 Global Parameters
 Classes
 Functions
@@ -66,7 +65,7 @@
 
  
  
 
 
diff --git a/doc/robodoc/player_lsp.html b/doc/robodoc/player_lsp.html
index 3a988ed2..3e61ab92 100755
--- a/doc/robodoc/player_lsp.html
+++ b/doc/robodoc/player_lsp.html
@@ -23,7 +23,6 @@
 Table of Contents
 Sourcefiles
 Index
-Metadata
 Global Parameters
 Classes
 Functions
@@ -677,7 +676,7 @@
 
  
  
 
 
diff --git a/doc/robodoc/popcorn_lsp.html b/doc/robodoc/popcorn_lsp.html
index b9ac889b..6a9ee899 100755
--- a/doc/robodoc/popcorn_lsp.html
+++ b/doc/robodoc/popcorn_lsp.html
@@ -23,7 +23,6 @@
 Table of Contents
 Sourcefiles
 Index
-Metadata
 Global Parameters
 Classes
 Functions
@@ -370,7 +369,7 @@
 
  
  
 
 
diff --git a/doc/robodoc/reaper-play_lsp.html b/doc/robodoc/reaper-play_lsp.html
index 8bbd72b8..a1aad92a 100644
--- a/doc/robodoc/reaper-play_lsp.html
+++ b/doc/robodoc/reaper-play_lsp.html
@@ -26,6 +26,7 @@
 
 
 
+
 
 

 
@@ -70,6 +71,9 @@
 
 
 
+
+
+
@@ -801,7 +800,7 @@ diff --git a/doc/robodoc/recurring-event_lsp.html b/doc/robodoc/recurring-event_lsp.html index 739a94b4..dfd332f0 100755 --- a/doc/robodoc/recurring-event_lsp.html +++ b/doc/robodoc/recurring-event_lsp.html @@ -23,7 +23,6 @@ Table of Contents Sourcefiles Index -Metadata Global Parameters Classes Functions @@ -98,7 +97,7 @@ Creation date: 4th February 2010 - $$ Last modified: 10:37:45 Wed Jun 7 2023 CEST + $$ Last modified: 16:18:50 Sat Jun 29 2024 CEST SVN ID: $Id$ @@ -257,7 +256,7 @@ diff --git a/doc/robodoc/recursive-assoc-list_lsp.html b/doc/robodoc/recursive-assoc-list_lsp.html index b66a30e5..83952797 100755 --- a/doc/robodoc/recursive-assoc-list_lsp.html +++ b/doc/robodoc/recursive-assoc-list_lsp.html @@ -23,7 +23,6 @@ Table of Contents Sourcefiles Index -Metadata Global Parameters Classes Functions @@ -1613,7 +1612,7 @@ diff --git a/doc/robodoc/rhythm_lsp.html b/doc/robodoc/rhythm_lsp.html index a0fed869..286c4224 100755 --- a/doc/robodoc/rhythm_lsp.html +++ b/doc/robodoc/rhythm_lsp.html @@ -23,7 +23,6 @@ Table of Contents Sourcefiles Index -Metadata Global Parameters Classes Functions @@ -54,7 +53,7 @@ Creation date: 11th February 2001 - $$ Last modified: 12:01:48 Thu Feb 22 2024 CET + $$ Last modified: 12:09:13 Wed Jul 17 2024 CEST SVN ID: $Id$ @@ -1281,7 +1280,7 @@ diff --git a/doc/robodoc/robo_classes.html b/doc/robodoc/robo_classes.html index 7c4a36bc..947e96cf 100755 --- a/doc/robodoc/robo_classes.html +++ b/doc/robodoc/robo_classes.html @@ -25,7 +25,6 @@ Table of Contents Sourcefiles Index -Metadata Global Parameters Classes Functions @@ -100,7 +99,7 @@

W

A - B - C - D - E - F - G - H - I - J - K - L - M - N - O - P - Q - R - S - T - U - V - W - X - Y - Z - 0 - 1 - 2 - 3 - 4 - 5 - 6 - 7 - 8 - 9 diff --git a/doc/robodoc/robo_functions.html b/doc/robodoc/robo_functions.html index b0fbbd03..2650a767 100755 --- a/doc/robodoc/robo_functions.html +++ b/doc/robodoc/robo_functions.html @@ -25,7 +25,6 @@ Table of Contents Sourcefiles Index -Metadata Global Parameters Classes Functions @@ -345,7 +344,7 @@

X

A - B - C - D - E - F - G - H - I - J - K - L - M - N - O - P - Q - R - S - T - U - V - W - X - Y - Z - 0 - 1 - 2 - 3 - 4 - 5 - 6 - 7 - 8 - 9 diff --git a/doc/robodoc/robo_metadata.html b/doc/robodoc/robo_metadata.html index 3fc1970e..b87b4939 100755 --- a/doc/robodoc/robo_metadata.html +++ b/doc/robodoc/robo_metadata.html @@ -12,10 +12,14 @@ +
+ + + diff --git a/doc/robodoc/robo_methods.html b/doc/robodoc/robo_methods.html index 135a7305..a3d9ef3d 100755 --- a/doc/robodoc/robo_methods.html +++ b/doc/robodoc/robo_methods.html @@ -25,7 +25,6 @@ Table of Contents Sourcefiles Index -Metadata Global Parameters Classes Functions @@ -429,6 +428,7 @@

N

new-limits next-event nmap-data +no-accidental no-accidental no-accidental note-add-bracket-offset @@ -681,7 +681,7 @@

W

A - B - C - D - E - F - G - H - I - J - K - L - M - N - O - P - Q - R - S - T - U - V - W - X - Y - Z - 0 - 1 - 2 - 3 - 4 - 5 - 6 - 7 - 8 - 9
diff --git a/doc/robodoc/robo_modules.html b/doc/robodoc/robo_modules.html index 1744c687..2d56832e 100755 --- a/doc/robodoc/robo_modules.html +++ b/doc/robodoc/robo_modules.html @@ -25,7 +25,6 @@ Table of Contents Sourcefiles Index -Metadata Global Parameters Classes Functions @@ -60,7 +59,7 @@

U

A - B - C - D - E - F - G - H - I - J - K - L - M - N - O - P - Q - R - S - T - U - V - W - X - Y - Z - 0 - 1 - 2 - 3 - 4 - 5 - 6 - 7 - 8 - 9 diff --git a/doc/robodoc/robo_parameters.html b/doc/robodoc/robo_parameters.html index 95dc8a65..26709e40 100755 --- a/doc/robodoc/robo_parameters.html +++ b/doc/robodoc/robo_parameters.html @@ -25,7 +25,6 @@ Table of Contents Sourcefiles Index -Metadata Global Parameters Classes Functions @@ -40,7 +39,7 @@

+

A - B - C - D - E - F - G - H - I - J - K - L - M - N - O - P - Q - R - S - T - U - V - W - X - Y - Z - 0 - 1 - 2 - 3 - 4 - 5 - 6 - 7 - 8 - 9 diff --git a/doc/robodoc/robo_slots.html b/doc/robodoc/robo_slots.html index a9698724..3b87e715 100755 --- a/doc/robodoc/robo_slots.html +++ b/doc/robodoc/robo_slots.html @@ -212,6 +212,7 @@ + qq(
@@ -746,6 +747,9 @@ + + + diff --git a/doc/robodoc/robo_sourcefiles.html b/doc/robodoc/robo_sourcefiles.html index 0b8208d0..4e6deb5e 100755 --- a/doc/robodoc/robo_sourcefiles.html +++ b/doc/robodoc/robo_sourcefiles.html @@ -25,7 +25,6 @@ Table of Contents Sourcefiles Index -Metadata Global Parameters Classes Functions @@ -324,7 +323,7 @@
diff --git a/doc/robodoc/roboindex.html b/doc/robodoc/roboindex.html index d1e117c3..984dc293 100755 --- a/doc/robodoc/roboindex.html +++ b/doc/robodoc/roboindex.html @@ -25,7 +25,6 @@ Table of Contents Sourcefiles Index -Metadata Global Parameters Classes Functions @@ -1160,7 +1159,7 @@

X

A - B - C - D - E - F - G - H - I - J - K - L - M - N - O - P - Q - R - S - T - U - V - W - X - Y - Z - 0 - 1 - 2 - 3 - 4 - 5 - 6 - 7 - 8 - 9 diff --git a/doc/robodoc/rthm-chain-slow_lsp.html b/doc/robodoc/rthm-chain-slow_lsp.html index 529c93d1..4b8fc39f 100755 --- a/doc/robodoc/rthm-chain-slow_lsp.html +++ b/doc/robodoc/rthm-chain-slow_lsp.html @@ -23,7 +23,6 @@ Table of Contents Sourcefiles Index -Metadata Global Parameters Classes Functions @@ -61,7 +60,7 @@ diff --git a/doc/robodoc/rthm-chain_lsp.html b/doc/robodoc/rthm-chain_lsp.html index e98c7125..9aaeeeb7 100755 --- a/doc/robodoc/rthm-chain_lsp.html +++ b/doc/robodoc/rthm-chain_lsp.html @@ -23,7 +23,6 @@ Table of Contents Sourcefiles Index -Metadata Global Parameters Classes Functions @@ -932,7 +931,7 @@ diff --git a/doc/robodoc/rthm-seq-bar_lsp.html b/doc/robodoc/rthm-seq-bar_lsp.html index 27b8dfda..9a7ab5bf 100755 --- a/doc/robodoc/rthm-seq-bar_lsp.html +++ b/doc/robodoc/rthm-seq-bar_lsp.html @@ -23,7 +23,6 @@ Table of Contents Sourcefiles Index -Metadata Global Parameters Classes Functions @@ -2971,7 +2970,7 @@ diff --git a/doc/robodoc/rthm-seq-map_lsp.html b/doc/robodoc/rthm-seq-map_lsp.html index dcc841de..2a2a30a7 100755 --- a/doc/robodoc/rthm-seq-map_lsp.html +++ b/doc/robodoc/rthm-seq-map_lsp.html @@ -23,7 +23,6 @@ Table of Contents Sourcefiles Index -Metadata Global Parameters Classes Functions @@ -724,7 +723,7 @@ diff --git a/doc/robodoc/rthm-seq-palette_lsp.html b/doc/robodoc/rthm-seq-palette_lsp.html index 4ee0b93a..c66c6356 100755 --- a/doc/robodoc/rthm-seq-palette_lsp.html +++ b/doc/robodoc/rthm-seq-palette_lsp.html @@ -23,7 +23,6 @@ Table of Contents Sourcefiles Index -Metadata Global Parameters Classes Functions @@ -1031,7 +1030,7 @@ diff --git a/doc/robodoc/rthm-seq_lsp.html b/doc/robodoc/rthm-seq_lsp.html index 05262862..419bbf87 100755 --- a/doc/robodoc/rthm-seq_lsp.html +++ b/doc/robodoc/rthm-seq_lsp.html @@ -23,7 +23,6 @@ Table of Contents Sourcefiles Index -Metadata Global Parameters Classes Functions @@ -2219,7 +2218,7 @@ diff --git a/doc/robodoc/samp5_lsp.html b/doc/robodoc/samp5_lsp.html index 7b16f802..9e2d957f 100755 --- a/doc/robodoc/samp5_lsp.html +++ b/doc/robodoc/samp5_lsp.html @@ -23,7 +23,6 @@ Table of Contents Sourcefiles Index -Metadata Global Parameters Classes Functions @@ -61,7 +60,7 @@ diff --git a/doc/robodoc/sc-map_lsp.html b/doc/robodoc/sc-map_lsp.html index 16bacb35..67aa77e4 100755 --- a/doc/robodoc/sc-map_lsp.html +++ b/doc/robodoc/sc-map_lsp.html @@ -23,7 +23,6 @@ Table of Contents Sourcefiles Index -Metadata Global Parameters Classes Functions @@ -838,7 +837,7 @@ diff --git a/doc/robodoc/sc-scale_lsp.html b/doc/robodoc/sc-scale_lsp.html index bef0f768..5794032d 100755 --- a/doc/robodoc/sc-scale_lsp.html +++ b/doc/robodoc/sc-scale_lsp.html @@ -212,6 +212,7 @@ + qq(
@@ -746,6 +747,9 @@ + + + diff --git a/doc/robodoc/sc-set_lsp.html b/doc/robodoc/sc-set_lsp.html index d478b5b7..b792da3f 100755 --- a/doc/robodoc/sc-set_lsp.html +++ b/doc/robodoc/sc-set_lsp.html @@ -23,7 +23,6 @@ Table of Contents Sourcefiles Index -Metadata Global Parameters Classes Functions @@ -1419,7 +1418,7 @@
diff --git a/doc/robodoc/sclist_lsp.html b/doc/robodoc/sclist_lsp.html index 060a31b2..42d7329f 100755 --- a/doc/robodoc/sclist_lsp.html +++ b/doc/robodoc/sclist_lsp.html @@ -23,7 +23,6 @@ Table of Contents Sourcefiles Index -Metadata Global Parameters Classes Functions @@ -595,7 +594,7 @@ diff --git a/doc/robodoc/section_lsp.html b/doc/robodoc/section_lsp.html index 2e6ea216..c7446dec 100755 --- a/doc/robodoc/section_lsp.html +++ b/doc/robodoc/section_lsp.html @@ -23,7 +23,6 @@ Table of Contents Sourcefiles Index -Metadata Global Parameters Classes Functions @@ -421,7 +420,7 @@ diff --git a/doc/robodoc/sequenz_lsp.html b/doc/robodoc/sequenz_lsp.html index 9fc4491d..db0f883e 100755 --- a/doc/robodoc/sequenz_lsp.html +++ b/doc/robodoc/sequenz_lsp.html @@ -23,7 +23,6 @@ Table of Contents Sourcefiles Index -Metadata Global Parameters Classes Functions @@ -66,7 +65,7 @@ diff --git a/doc/robodoc/set-map_lsp.html b/doc/robodoc/set-map_lsp.html index 87c12f3e..a9e5ccc9 100755 --- a/doc/robodoc/set-map_lsp.html +++ b/doc/robodoc/set-map_lsp.html @@ -23,7 +23,6 @@ Table of Contents Sourcefiles Index -Metadata Global Parameters Classes Functions @@ -169,7 +168,7 @@ diff --git a/doc/robodoc/set-palette_lsp.html b/doc/robodoc/set-palette_lsp.html index 435a8189..cad69c66 100755 --- a/doc/robodoc/set-palette_lsp.html +++ b/doc/robodoc/set-palette_lsp.html @@ -23,7 +23,6 @@ Table of Contents Sourcefiles Index -Metadata Global Parameters Classes Functions @@ -1547,7 +1546,7 @@ diff --git a/doc/robodoc/simple-change-map_lsp.html b/doc/robodoc/simple-change-map_lsp.html index 3dbe355b..81edb812 100755 --- a/doc/robodoc/simple-change-map_lsp.html +++ b/doc/robodoc/simple-change-map_lsp.html @@ -23,7 +23,6 @@ Table of Contents Sourcefiles Index -Metadata Global Parameters Classes Functions @@ -149,7 +148,7 @@ diff --git a/doc/robodoc/sine_lsp.html b/doc/robodoc/sine_lsp.html index ec91c810..99bd5118 100755 --- a/doc/robodoc/sine_lsp.html +++ b/doc/robodoc/sine_lsp.html @@ -23,7 +23,6 @@ Table of Contents Sourcefiles Index -Metadata Global Parameters Classes Functions @@ -63,7 +62,7 @@ diff --git a/doc/robodoc/slippery-chicken-edit_lsp.html b/doc/robodoc/slippery-chicken-edit_lsp.html index d7b3430d..7949be09 100755 --- a/doc/robodoc/slippery-chicken-edit_lsp.html +++ b/doc/robodoc/slippery-chicken-edit_lsp.html @@ -23,7 +23,6 @@ Table of Contents Sourcefiles Index -Metadata Global Parameters Classes Functions @@ -5583,7 +5582,7 @@ diff --git a/doc/robodoc/slippery-chicken-manual.pdf b/doc/robodoc/slippery-chicken-manual.pdf index 99a39d66..67f5f86b 100755 Binary files a/doc/robodoc/slippery-chicken-manual.pdf and b/doc/robodoc/slippery-chicken-manual.pdf differ diff --git a/doc/robodoc/slippery-chicken_lsp.html b/doc/robodoc/slippery-chicken_lsp.html index 89278e5d..ca1f091d 100755 --- a/doc/robodoc/slippery-chicken_lsp.html +++ b/doc/robodoc/slippery-chicken_lsp.html @@ -23,7 +23,6 @@ Table of Contents Sourcefiles Index -Metadata Global Parameters Classes Functions @@ -92,7 +91,7 @@ Creation date: March 19th 2001 - $$ Last modified: 13:41:32 Fri Mar 22 2024 CET + $$ Last modified: 20:29:49 Tue Jul 2 2024 CEST @@ -5654,7 +5653,7 @@ diff --git a/doc/robodoc/sndfile-ext_lsp.html b/doc/robodoc/sndfile-ext_lsp.html index ebd36996..d0ae557d 100755 --- a/doc/robodoc/sndfile-ext_lsp.html +++ b/doc/robodoc/sndfile-ext_lsp.html @@ -23,7 +23,6 @@ Table of Contents Sourcefiles Index -Metadata Global Parameters Classes Functions @@ -300,14 +299,14 @@ Creation date: 16th December 2012, Koh Mak, Thailand - $$ Last modified: 12:16:44 Thu Mar 21 2024 CET + $$ Last modified: 15:37:48 Sat Jun 22 2024 CEST SVN ID: $Id$ diff --git a/doc/robodoc/sndfile-palette_lsp.html b/doc/robodoc/sndfile-palette_lsp.html index d2e88d80..ddc4fbc9 100755 --- a/doc/robodoc/sndfile-palette_lsp.html +++ b/doc/robodoc/sndfile-palette_lsp.html @@ -23,7 +23,6 @@ Table of Contents Sourcefiles Index -Metadata Global Parameters Classes Functions @@ -58,7 +57,7 @@ Creation date: 18th March 2001 - $$ Last modified: 12:25:25 Thu Mar 21 2024 CET + $$ Last modified: 17:10:00 Sat Jun 29 2024 CEST SVN ID: $Id$ @@ -181,7 +180,9 @@ - A single pattern (string) or list of patterns that the sound file name must have--just the filename, excluding path/folders and extension. If a list then all patterns must be in the file name, not - just one of them. Default = NIL. + just one of them, unless (hack alert!) the first element of the list is + the symbol or, in which case only one of the patterns must be + present. Default = NIL. - Sim. to :insist except this/these are patterns none of which can be in the file name. Default = NIL. @@ -689,7 +690,7 @@ diff --git a/doc/robodoc/sndfile_lsp.html b/doc/robodoc/sndfile_lsp.html index 1052f9bd..bba675dd 100755 --- a/doc/robodoc/sndfile_lsp.html +++ b/doc/robodoc/sndfile_lsp.html @@ -23,7 +23,6 @@ Table of Contents Sourcefiles Index -Metadata Global Parameters Classes Functions @@ -55,7 +54,7 @@ Creation date: March 21st 2001 - $$ Last modified: 13:45:04 Thu Apr 18 2024 CEST + $$ Last modified: 10:02:08 Mon Jun 24 2024 CEST @@ -338,7 +337,7 @@ diff --git a/doc/robodoc/sndfilenet_lsp.html b/doc/robodoc/sndfilenet_lsp.html index ae653c6d..d57317d1 100755 --- a/doc/robodoc/sndfilenet_lsp.html +++ b/doc/robodoc/sndfilenet_lsp.html @@ -23,7 +23,6 @@ Table of Contents Sourcefiles Index -Metadata Global Parameters Classes Functions @@ -332,7 +331,7 @@ diff --git a/doc/robodoc/spectra_lsp.html b/doc/robodoc/spectra_lsp.html index eeabd3ab..1fcd34c1 100755 --- a/doc/robodoc/spectra_lsp.html +++ b/doc/robodoc/spectra_lsp.html @@ -23,7 +23,6 @@ Table of Contents Sourcefiles Index -Metadata Global Parameters Classes Functions @@ -156,7 +155,7 @@ diff --git a/doc/robodoc/tempo-map_lsp.html b/doc/robodoc/tempo-map_lsp.html index 442de2cb..1ab780e6 100755 --- a/doc/robodoc/tempo-map_lsp.html +++ b/doc/robodoc/tempo-map_lsp.html @@ -23,7 +23,6 @@ Table of Contents Sourcefiles Index -Metadata Global Parameters Classes Functions @@ -64,7 +63,7 @@ diff --git a/doc/robodoc/tempo_lsp.html b/doc/robodoc/tempo_lsp.html index 353c0bc9..59699e4c 100755 --- a/doc/robodoc/tempo_lsp.html +++ b/doc/robodoc/tempo_lsp.html @@ -23,7 +23,6 @@ Table of Contents Sourcefiles Index -Metadata Global Parameters Classes Functions @@ -148,7 +147,7 @@ diff --git a/doc/robodoc/time-sig_lsp.html b/doc/robodoc/time-sig_lsp.html index 239a65ac..0ff1bced 100755 --- a/doc/robodoc/time-sig_lsp.html +++ b/doc/robodoc/time-sig_lsp.html @@ -23,7 +23,6 @@ Table of Contents Sourcefiles Index -Metadata Global Parameters Classes Functions @@ -418,7 +417,7 @@ diff --git a/doc/robodoc/tl-set_lsp.html b/doc/robodoc/tl-set_lsp.html index e9a91f71..b2856c3d 100755 --- a/doc/robodoc/tl-set_lsp.html +++ b/doc/robodoc/tl-set_lsp.html @@ -23,7 +23,6 @@ Table of Contents Sourcefiles Index -Metadata Global Parameters Classes Functions @@ -687,7 +686,7 @@ diff --git a/doc/robodoc/toc_index.html b/doc/robodoc/toc_index.html index fa4591bc..d33261ed 100755 --- a/doc/robodoc/toc_index.html +++ b/doc/robodoc/toc_index.html @@ -25,7 +25,6 @@ Table of Contents Sourcefiles Index -Metadata Global Parameters Classes Functions @@ -1075,7 +1074,7 @@

TABLE OF CONTENTS

diff --git a/doc/robodoc/utilities_lsp.html b/doc/robodoc/utilities_lsp.html index 0884ca01..72711111 100755 --- a/doc/robodoc/utilities_lsp.html +++ b/doc/robodoc/utilities_lsp.html @@ -23,7 +23,6 @@ Table of Contents Sourcefiles Index -Metadata Global Parameters Classes Functions @@ -53,7 +52,7 @@ Creation date: June 24th 2002 - $$ Last modified: 16:16:48 Thu Mar 21 2024 CET + $$ Last modified: 20:38:20 Tue Jul 2 2024 CEST @@ -4012,7 +4011,7 @@ diff --git a/doc/robodoc/vidfile_lsp.html b/doc/robodoc/vidfile_lsp.html index e137bb1a..d85324d4 100644 --- a/doc/robodoc/vidfile_lsp.html +++ b/doc/robodoc/vidfile_lsp.html @@ -23,7 +23,6 @@ Table of Contents Sourcefiles Index -Metadata Global Parameters Classes Functions @@ -64,12 +63,12 @@ Creation date: 19th March 2024, Heidhausen, Germany - $$ Last modified: 17:37:47 Tue Apr 16 2024 CEST + $$ Last modified: 15:50:21 Sat Jun 22 2024 CEST diff --git a/doc/robodoc/violin-ensemble-spectra_lsp.html b/doc/robodoc/violin-ensemble-spectra_lsp.html index 74b9d985..b7d776d2 100755 --- a/doc/robodoc/violin-ensemble-spectra_lsp.html +++ b/doc/robodoc/violin-ensemble-spectra_lsp.html @@ -23,7 +23,6 @@ Table of Contents Sourcefiles Index -Metadata Global Parameters Classes Functions @@ -64,7 +63,7 @@ diff --git a/doc/robodoc/wolfram_lsp.html b/doc/robodoc/wolfram_lsp.html index 760b15ce..435be896 100755 --- a/doc/robodoc/wolfram_lsp.html +++ b/doc/robodoc/wolfram_lsp.html @@ -23,7 +23,6 @@ Table of Contents Sourcefiles Index -Metadata Global Parameters Classes Functions @@ -998,7 +997,7 @@ diff --git a/src/intervals-mapper.lsp b/src/intervals-mapper.lsp index 2dd7ed58..e83e9e48 100644 --- a/src/intervals-mapper.lsp +++ b/src/intervals-mapper.lsp @@ -28,7 +28,7 @@ ;;; ;;; Creation date: August 3rd 2010 Edinburgh ;;; -;;; $$ Last modified: 12:57:04 Fri Sep 23 2016 BST +;;; $$ Last modified: 12:52:49 Mon Aug 19 2024 CEST ;;; ;;; ;;; SVN ID: $Id$ @@ -63,6 +63,7 @@ ;;; from it we'll extract the intervals stored in steps. (defclass intervals-mapper (sclist) ((steps :accessor steps :type list :initform nil) + (highest :accessor highest :type number :initarg :highest :initform 119) ;; tonic remains a simple note symbol e.g. 'c4 (tonic ::accessor tonic :type symbol :initarg :tonic :initform 'c4) (scale-pitches :accessor scale-pitches :type list :initform nil) @@ -81,9 +82,6 @@ (clone-with-new-class im 'intervals-mapper)) ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; - -;;; SAR Thu May 3 18:15:56 BST 2012: Added robodoc entry - ;;; ****m* intervals-mapper/get-pitch-symbols ;;; DESCRIPTION ;;; Get the pitches contained in a given intervals-mapper object returned as a @@ -115,9 +113,9 @@ (defmethod print-object :before ((im intervals-mapper) stream) (format stream "~&INTERVALS-MAPPER: steps: ~a, ~&scale-pitches ~ - (pitch objects): ~a~&tonic: ~a" + (pitch objects): ~a~&tonic: ~a, highest: ~a (~a)" (steps im) (pitch-list-to-symbols (scale-pitches im)) - (tonic im))) + (tonic im) (highest im) (midi-to-note (highest im)))) ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; @@ -125,20 +123,20 @@ (declare (ignore new-class)) (let ((scl (call-next-method))) ;; the data list is copied by the named-object class clone method - (setf (slot-value scl 'steps) (my-copy-list (steps scl)) - (slot-value scl 'scale-pitches) (my-copy-list (scale-pitches scl))) + (setf (slot-value scl 'steps) (my-copy-list (steps im)) + (slot-value scl 'highest) (highest im) + (slot-value scl 'tonic) (tonic im) + (slot-value scl 'scale-pitches) (my-copy-list (scale-pitches im))) scl)) ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; (defmethod verify-and-store ((im intervals-mapper)) - (get-steps im) - (get-scale im (tonic im))) + (when (and (data im) (tonic im)) + (get-steps im) + (get-scale im (tonic im)))) ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; - -;;; SAR Thu May 3 18:21:13 BST 2012: Added robodoc entry - ;;; ****m* intervals-mapper/get-steps ;;; DESCRIPTION ;;; Extract the interval structure of the list of note-name pitch symbols @@ -172,14 +170,11 @@ (setf (steps im) steps))) ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; - -;;; SAR Thu May 3 18:27:43 BST 2012: Conforming robodoc entry - ;;; ****m* intervals-mapper/get-scale ;;; DESCRIPTION ;;; Create a scale (sequence of pitches) beginning with the specified starting -;;; note and extending up to MIDI note 127 by cycling through the interval -;;; structure of the STEPS slot. +;;; note and extending up to MIDI note 119 (by default: settable in the highest +;;; slot) by cycling through the interval structure of the STEPS slot. ;;; ;;; The scale will only repeat at octaves if the interval structure of the list ;;; of pitches passed at initialisation creates that result. @@ -209,8 +204,10 @@ (defmethod get-scale ((im intervals-mapper) start-note) ;;; **** (let* ((midi-start (note-to-midi start-note)) - (steps nil) - (midi (loop with current = midi-start while (< current 128) + (steps nil) + (stop (1+ (highest im))) + (midi (loop with current = midi-start + while (< current stop) do (unless steps (setf steps (copy-list (steps im)))) collect current @@ -404,10 +401,7 @@ data: E4 for this-pitch = (nth start (scale-pitches im)) while this-pitch do - ;; (print (data this-pitch)) (when (pitch-class-eq pitch this-pitch t) - ;; (print (data this-pitch)) - ;; (print (data (nth start (scale-pitches im)))) (return (if return-nth start degree))))) ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; diff --git a/src/sclist.lsp b/src/sclist.lsp index 5ee05ce4..34d31ba1 100644 --- a/src/sclist.lsp +++ b/src/sclist.lsp @@ -18,7 +18,7 @@ ;;; ;;; Creation date: February 11th 2001 ;;; -;;; $$ Last modified: 17:52:24 Wed Jan 31 2024 CET +;;; $$ Last modified: 12:45:35 Mon Aug 19 2024 CEST ;;; ;;; SVN ID: $Id$ ;;; @@ -91,8 +91,6 @@ (defmethod (setf data) :after (value (i sclist)) (declare (ignore value)) - ;; (print 'setf-data-sclist) - ;; (print value) (verify-and-store i)) ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; diff --git a/tests/sc-test-full.lsp b/tests/sc-test-full.lsp index 4cff0546..86197568 100644 --- a/tests/sc-test-full.lsp +++ b/tests/sc-test-full.lsp @@ -14,7 +14,7 @@ ;;; ;;; Creation date: 11th December 2011 (Bangkok) ;;; -;;; $$ Last modified: 13:17:34 Mon Mar 25 2024 CET +;;; $$ Last modified: 16:17:16 Tue Aug 13 2024 CEST ;;; ;;; SVN ID: $Id: bar-holder.lsp 431 2011-12-08 14:44:30Z medward2 $ ;;; @@ -373,25 +373,26 @@ ;;; MDE Fri May 17 19:50:00 2013 -- test other pieces in the examples dir ;;; (simply by loading). (sc-deftest test-other-pieces () - (loop for i in '("hello-slippery.lsp" #+clm "sc-and-clm-examples.lsp" - #+clm "second-law-clm.lsp" "cavatina.lsp" - "chop-examples.lsp" "chords-examples.lsp" - "coming-piano-chords.lsp" "enharmonics-examples.lsp" - "ensemble-examples.lsp" "exercises.lsp" - "fibonacci-examples.lsp" "instruments-examples.lsp" - "l-systems-examples.lsp" "marks-examples.lsp" - "notenames-scales-examples.lsp" - "o-haupt-voll-blut.lsp" - "objects-slots-examples.lsp" "output-examples.lsp" - "permutation-examples.lsp" "pitches-examples.lsp" - "post-gen-editing-examples.lsp" - "reeling-trains.lsp" "rhythms-examples.lsp" - "rsp-rsm-examples.lsp" - "scores-examples.lsp" - "tempo-examples.lsp" "tonal-algo-example.lsp" - "rhythm-chains-examples.lsp") - do (load-from-examples-dir i)) - t) + (loop for i in '("hello-slippery.lsp" + #+clm "sc-and-clm-examples.lsp" + #+clm "second-law-clm.lsp" "cavatina.lsp" + "chop-examples.lsp" "chords-examples.lsp" + "coming-piano-chords.lsp" "enharmonics-examples.lsp" + "ensemble-examples.lsp" "exercises.lsp" + "fibonacci-examples.lsp" "instruments-examples.lsp" + "l-systems-examples.lsp" "marks-examples.lsp" + "notenames-scales-examples.lsp" + "o-haupt-voll-blut.lsp" + "objects-slots-examples.lsp" "output-examples.lsp" + "permutation-examples.lsp" "pitches-examples.lsp" + "post-gen-editing-examples.lsp" + "reeling-trains.lsp" "rhythms-examples.lsp" + "rsp-rsm-examples.lsp" + "scores-examples.lsp" + "tempo-examples.lsp" "tonal-algo-example.lsp" + "rhythm-chains-examples.lsp") + do (load-from-examples-dir i)) + t) (load-from-test-suite-dir "workshop-exercises.lsp")