64 lines
2.1 KiB
C++
64 lines
2.1 KiB
C++
|
#ifndef Musique_Internal_HH
|
||
|
|
#define Musique_Internal_HH
|
||
|
|
|
||
|
|
/// Binary operation may be vectorized when there are two argument which one is indexable and other is not
|
||
|
|
static inline bool may_be_vectorized(std::vector<Value> const& args)
|
||
|
|
{
|
||
|
|
return args.size() == 2 && (is_indexable(args[0].type) != is_indexable(args[1].type));
|
||
|
|
}
|
||
|
|
|
||
|
|
struct Interpreter::Incoming_Midi_Callbacks
|
||
|
|
{
|
||
|
|
Value note_on{};
|
||
|
|
Value note_off{};
|
||
|
|
|
||
|
|
inline Incoming_Midi_Callbacks() = default;
|
||
|
|
|
||
|
|
Incoming_Midi_Callbacks(Incoming_Midi_Callbacks &&) = delete;
|
||
|
|
Incoming_Midi_Callbacks(Incoming_Midi_Callbacks const&) = delete;
|
||
|
|
|
||
|
|
Incoming_Midi_Callbacks& operator=(Incoming_Midi_Callbacks &&) = delete;
|
||
|
|
Incoming_Midi_Callbacks& operator=(Incoming_Midi_Callbacks const&) = delete;
|
||
|
|
|
||
|
|
|
||
|
|
inline void add_callbacks(midi::Connection &midi, Interpreter &interpreter)
|
||
|
|
{
|
||
|
|
register_callback(midi.note_on_callback, note_on, interpreter);
|
||
|
|
register_callback(midi.note_off_callback, note_off, interpreter);
|
||
|
|
}
|
||
|
|
|
||
|
|
template<typename ...T>
|
||
|
|
inline void register_callback(std::function<void(T...)> &target, Value &callback, Interpreter &i)
|
||
|
|
{
|
||
|
|
if (&callback == ¬e_on || &callback == ¬e_off) {
|
||
|
|
// This messages have MIDI note number as second value, so they should be represented
|
||
|
|
// in our own note abstraction, not as numbers.
|
||
|
|
target = [interpreter = &i, callback = &callback](T ...source_args)
|
||
|
|
{
|
||
|
|
if (callback->type != Value::Type::Nil) {
|
||
|
|
std::vector<Value> args { Value::from(Number(source_args))... };
|
||
|
|
args[1] = Value::from(Chord { .notes { Note {
|
||
|
|
.base = i32(args[1].n.num % 12),
|
||
|
|
.octave = args[1].n.num / 12
|
||
|
|
}}});
|
||
|
|
auto result = (*callback)(*interpreter, std::move(args));
|
||
|
|
// We discard this since callback is running in another thread.
|
||
|
|
(void) result;
|
||
|
|
}
|
||
|
|
};
|
||
|
|
} else {
|
||
|
|
// Generic case, preserve all passed parameters as numbers
|
||
|
|
target = [interpreter = &i, callback = &callback](T ...source_args)
|
||
|
|
{
|
||
|
|
if (callback->type != Value::Type::Nil) {
|
||
|
|
auto result = (*callback)(*interpreter, { Value::from(Number(source_args))... });
|
||
|
|
// We discard this since callback is running in another thread.
|
||
|
|
(void) result;
|
||
|
|
}
|
||
|
|
};
|
||
|
|
}
|
||
|
|
}
|
||
|
|
};
|
||
|
|
|
||
|
|
#endif
|