Mercurial > hg > amuse

changeset 192:54d79a2c82d2

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
fix make-chromatic-pitched-event constructor Ignore-this: 93298c4a64a4a65dc948f8473c92a9c8 darcs-hash:20090524152250-16a00-295d43f8c2d16089196ab223b43264ae55f5620b.gz
author j.forth <j.forth@gold.ac.uk>
date Sun, 24 May 2009 16:22:50 +0100
parents 4d06910b6f0f
children c18f795f4463
files base/constructors.lisp
diffstat 1 files changed, 2 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/base/constructors.lisp	Tue May 19 14:56:17 2009 +0100
+++ b/base/constructors.lisp	Sun May 24 16:22:50 2009 +0100
@@ -61,7 +61,7 @@
 ;; Events
 
 (defun make-chromatic-pitched-event (pitch-number onset duration)
-  (make-instance 'chromatic-pitched-event
+  (make-instance 'standard-chromatic-pitched-event
 		 :number pitch-number
 		 :time onset
 		 :interval duration))
@@ -149,4 +149,4 @@
                  :line 3
                  :octave-shift nil
                  :time onset
-                 :interval duration))
\ No newline at end of file
+                 :interval duration))