# HG changeset patch
# User c.rhodes <c.rhodes@gold.ac.uk>
# Date 1194022925 0
# Node ID b8c73a9b9c10f0573619ec7ff483e1940f85d19e
# Parent  a45da9b93b37ef39883a06a8b9e7af9cf308729e
fix gsharp import for class changes

make-tempo -> make-standard-tempo-period

darcs-hash:20071102170205-dc3a5-5ce9aa7aa6571001c360309e837003a83544046a.gz

diff -r a45da9b93b37 -r b8c73a9b9c10 implementations/gsharp/gsharp-import.lisp
--- a/implementations/gsharp/gsharp-import.lisp	Thu Oct 25 13:22:56 2007 +0100
+++ b/implementations/gsharp/gsharp-import.lisp	Fri Nov 02 17:02:05 2007 +0000
@@ -75,7 +75,7 @@
 				  ;; gsharp is made to have a sane
 				  ;; divisions value in play.lisp
 				  ;; instead of 25
-				  :tempi (list (make-tempo (* 128 (/ (* 4 25) (gsharp-buffer:tempo segment))) 0 duration))
+				  :tempi (list (make-standard-tempo-period (* 128 (/ (* 4 25) (gsharp-buffer:tempo segment))) 0 duration))
 				  :time 0
 				  :interval duration)))
       (sequence:adjust-sequence result (length events)