Mercurial > hg > amuse

view implementations/tabcode/classes.lisp @ 116:b4f4df48337d

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Addition of viewpointable classes and methods These may be in the wrong place, but are designed to facilitate pluggability of viewpoints for well-behaved implementations darcs-hash:20070726160347-f76cc-6e6da5d488b3f252d0575e42daa566130481f955.gz
author David Lewis <d.lewis@gold.ac.uk>
date Thu, 26 Jul 2007 17:03:47 +0100
parents 48661eb2da71
children fd85f52d9f9d
line wrap: on
line source
(cl:in-package #:amuse-tabcode) 

(defclass tabcode-composition (amuse:composition)
  ())

(defclass tabcode-pitched-event (chromatic-pitched-event)
  ((course :initarg :course :reader course)
   (fret :initarg :fret :reader fret)
   (word :initarg :word :reader word)))