changeset 181:a397dfe432f6

TabCode Packaging darcs-hash:20080709073509-40ec0-33b68a60705a58bedaab5ec071c16501a21a9ad2.gz
author d.lewis <d.lewis@gold.ac.uk>
date Wed, 09 Jul 2008 08:35:09 +0100
parents 1a2b876b5587
children 470e83242576
files implementations/tabcode/methods.lisp implementations/tabcode/package.lisp
diffstat 2 files changed, 4 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/implementations/tabcode/methods.lisp	Tue Jul 08 16:24:14 2008 +0100
+++ b/implementations/tabcode/methods.lisp	Wed Jul 09 08:35:09 2008 +0100
@@ -3,7 +3,7 @@
 (defmethod tempi ((composition tabcode-composition))
   ())
 (defmethod time-signatures ((composition tabcode-composition))
-  ())
+  (metrical-signs composition))
 
 (defmethod get-applicable-key-signatures (object (composition tabcode-composition))
  ())
--- a/implementations/tabcode/package.lisp	Tue Jul 08 16:24:14 2008 +0100
+++ b/implementations/tabcode/package.lisp	Wed Jul 09 08:35:09 2008 +0100
@@ -1,3 +1,5 @@
 (cl:defpackage "AMUSE-TABCODE"
   (:use "CL" "AMUSE" "AMUSE-UTILS" "TABCODE")
-  (:export "COURSE" "WORD" "TABCODE-PITCHED-EVENT" "TABCODE-COMPOSITION"))
+  (:export "COURSE" "WORD" "TABCODE-PITCHED-EVENT" "TABCODE-COMPOSITION"
+           "TABCODE-TIME-SIGNATURE" "TABCODE-FILE-IDENTIFIER"
+           "ECOLM-IDENTIFIER" "GET-ECOLM-CONNECTION"))