view tools/package.lisp @ 171:98443d36ac6a

Fixed sequence:make-sequence-like :around method

The :around method clobbered the %data slot, as Christophe put it.

darcs-hash:20080123180914-990ec-629ecf5d60363512e6831800bb1e61dbcb8f94f5.gz

(cl:defpackage #:amuse-tools
  (:use #:common-lisp #:amuse #:amuse-utils #:midi)
  (:export #:play
	   #:write-midi
	   #:make-midi
	   #:global-messages
	   #:tempo-message
	   #:event-messages
	   #:get-patch-for-midi
	   #:get-channel-for-midi
	   #:get-pitch-for-midi
	   #:get-velocity-for-midi
	   ))