# HG changeset patch
# User Jamie Forth <j.forth@gold.ac.uk>
# Date 1298546598 0
# Node ID 2b31a375701bac834e6086bccfc1a0e7ec44077b
# Parent  25b6b52eb7705f48f25e4f16ea2a9bf1f355e749
Change midifile-import to call event constructors, not make-instance
directly.

diff -r 25b6b52eb770 -r 2b31a375701b implementations/midi/constructors.lisp
--- a/implementations/midi/constructors.lisp	Thu Feb 24 11:23:18 2011 +0000
+++ b/implementations/midi/constructors.lisp	Thu Feb 24 11:23:18 2011 +0000
@@ -5,7 +5,6 @@
 
 (defun make-midi-pitched-event (pitch-number velocity patch
 				channel track onset duration)
-  "FIXME: This is never called."
   (make-instance 'midi-pitched-event
 		 :number pitch-number
 		 :velocity velocity
@@ -17,7 +16,6 @@
 
 (defun make-midi-percussive-event (sound velocity patch
 				   channel track onset duration)
-  "FIXME: This is never called."
   (make-instance 'midi-percussive-event
 		 :sound sound
 		 :velocity velocity