reduce verbosity of DEBUG::Sequence traces

[ardour.git] / libs / evoral / src / MIDIEvent.cpp

diff --git a/libs/evoral/src/MIDIEvent.cpp b/libs/evoral/src/MIDIEvent.cpp
index 9793b31476b5b5637d677620d5be9134d16e782b..66a97f73e48b53ea54670b71b6c265602f7c2525 100644 (file)
--- a/libs/evoral/src/MIDIEvent.cpp
+++ b/libs/evoral/src/MIDIEvent.cpp
@@ -1,5 +1,5 @@
 /* This file is part of Evoral.
- * Copyright (C) 2008 Dave Robillard <http://drobilla.net>
+ * Copyright (C) 2008 David Robillard <http://drobilla.net>
  * Copyright (C) 2000-2008 Paul Davis
  *
  * Evoral is free software; you can redistribute it and/or modify it under the
@@ -60,19 +60,40 @@ MIDIEvent<Time>::to_xml() const
        switch (type()) {
        case MIDI_CMD_CONTROL:
                result = new XMLNode("ControlChange");
-               result->add_property("Channel", channel());
-               result->add_property("Control", cc_number());
-               result->add_property("Value",   cc_value());
+               result->add_property("Channel", long(channel()));
+               result->add_property("Control", long(cc_number()));
+               result->add_property("Value",   long(cc_value()));
                break;
 
        case MIDI_CMD_PGM_CHANGE:
                result = new XMLNode("ProgramChange");
-               result->add_property("Channel", channel());
-               result->add_property("Number",  pgm_number());
+               result->add_property("Channel", long(channel()));
+               result->add_property("Number",  long(pgm_number()));
+               break;
+
+       case MIDI_CMD_NOTE_ON:
+               result = new XMLNode("NoteOn");
+               result->add_property("Channel", long(channel()));
+               result->add_property("Note",  long(note()));
+               result->add_property("Velocity",  long(velocity()));
+               break;
+
+       case MIDI_CMD_NOTE_OFF:
+               result = new XMLNode("NoteOff");
+               result->add_property("Channel", long(channel()));
+               result->add_property("Note",  long(note()));
+               result->add_property("Velocity",  long(velocity()));
+               break;
+
+       case MIDI_CMD_BENDER:
+               result = new XMLNode("PitchBendChange");
+               result->add_property("Channel", long(channel()));
+               result->add_property("Value",  long(pitch_bender_value()));
                break;
 
        default:
                // The implementation is continued as needed
+               result = new XMLNode("NotImplemented");
                break;
        }