AW: [CM] Newbie question: Common Music doesn't start under xemacs
Robert Matovinovic
robert.matovinovic@web.de
Thu, 20 Jul 2006 00:47:49 +0100
This is a multi-part message in MIME format.
------=_NextPart_000_001E_01C6AB96.248C0CC0
Content-Type: text/plain;
charset="iso-8859-1"
Content-Transfer-Encoding: quoted-printable
Your code didn't help. The error message was still the same. It took me =
some
hours, but now its working, and the changes are minor. I avoided
easy-menu-create-menu. My guess is that the error is caused by a bug in
easymenu.el of xemacs, because easy-menu-create-menu is just not there. =
Here
are the lines:
;; "Common Music" as first list item added, otherwise error under
;; xemacs 21.4.19, when used by next easy-menu-add-item call
;; Robert Matovinovic, 20.07.2006, robert.matovinovic@web.de
(defvar *common-music-doc-menu*
`("Common Music"
[ "Home Page" (cm-doc "cm.html") t]
[ "Installing" (cm-doc "install.html") t]
[ "Working in Emacs" (cm-doc "emacs.html") t]
"--"
[ "Tutorials" (cm-doc "../etc/tutorials/") t]
[ "Examples" (cm-doc "../etc/examples/") t]
"--"
[ "Dictionary" (cm-doc "dict/index.html") t]
[ "Lookup..." cm-lookup t]
))
;; last argument changed to make it workable under xemacs 21.4.19
;; see also definition of *common-music-doc-menu* above
;; Robert Matovinovic, 20.07.2006, robert.matovinovic@web.de
(easy-menu-add-item menubar-slime
'("Documentation")
*common-music-doc-menu*)
;; following lines don't work under xemacs 21.4.19,
;; (easy-menu-create-menu "Common Music"
;; *common-music-doc-menu*))
I attach my changed cm.el
Cheers
-----Urspr=FCngliche Nachricht-----
Von: taube@uiuc.edu [mailto:taube@uiuc.edu]=20
Gesendet: Monday, July 17, 2006 23:43
An: Robert Matovinovic
Cc: cmdist@ccrma.Stanford.EDU
Betreff: Re: [CM] Newbie question: Common Music doesn't start under =
xemacs
cripes. try adding this to cm.el before the line that calls=20
easy-menu-add-item. let me know if it works. if not, you will have to=20
find out how to add a menu to an existing menu in xemacs and send it to=20
me.
(if (string-match "XEmacs" emacs-version)
(defun easy-menu-add-item (menu path item &optional before)
(add-menu-button path item before menu))))
------=_NextPart_000_001E_01C6AB96.248C0CC0
Content-Type: application/octet-stream;
name="cm.el"
Content-Transfer-Encoding: quoted-printable
Content-Disposition: attachment;
filename="cm.el"
;;; =
**********************************************************************=0A=
;;; Copyright (C) 2006 Heinrich Taube=0A=
;;; =0A=
;;; This program is free software; you can redistribute it and/or=0A=
;;; modify it under the terms of the Lisp Lesser Gnu Public License.=0A=
;;; See http://www.cliki.net/LLGPL for the terms of this agreement.=0A=
;;; =
**********************************************************************=0A=
=0A=
;;; $Name: rel-2_8_0 $=0A=
;;; $Revision: 1.14 $=0A=
;;; $Date: 2006/03/29 23:30:25 $=0A=
=0A=
;;;=0A=
;;; Emacs/Slime support for Common Music. Most commands are not bound=0A=
;;; to keys, see entries for some suggestions. CM's documentation menu=0A=
;;; is installed under the SLIME -> Documentation submenu.=0A=
;;;=0A=
;;; M-x cm =
[Command]=0A=
;;; Start up cm in a new frame, window, or buffer (see=0A=
;;; inferior-lisp-program and inferior-lisp-display below).=0A=
;;; M-x kill-cm =
[Command]=0A=
;;; Kill existing *slime-repl* session.=0A=
;;; M-x enable-cm-commands =
[Command]=0A=
;;; Adds the following keyboard comands:=0A=
;;; <f8> One-stroke switching between repl and lisp buffer.=0A=
;;; C-cC-dc Find symbol at point in Common Music dictionary. =0A=
;;; (also in menu SLIME->Documentation->Common Music)=0A=
;;; C-xC-e Eval expr before, after, around or whole region.=0A=
;;; On OS X this is also installed on APPLE-E.=0A=
;;; TAB Indent line, region or defun (if prefixed).=0A=
;;;=0A=
;;; *common-music-doc-root* =
[Variable]=0A=
;;; The root URL for browsing CM documentation. Defaults=0A=
;;; to "http://commonmusic.sf.net/doc/"=0A=
;;; inferior-lisp-program =
[Variable]=0A=
;;; The shell program to start CM. Defaults to "cm".=0A=
=0A=
(unless (member 'slime features)=0A=
(require 'slime)=0A=
(slime-setup))=0A=
=0A=
(when (member 'aquamacs features)=0A=
(add-to-list 'obof-other-frame-regexps "\\*inferior-lisp\\*")=0A=
(add-to-list 'obof-other-frame-regexps "\\*slime-repl\\\\*")=0A=
(defun slime-hide-inferior-lisp-buffer ()=0A=
"Display the REPL buffer instead of the *inferior-lisp* buffer."=0A=
(let ((buffer (if (slime-process)=0A=
(process-buffer (slime-process)))))=0A=
(when buffer=0A=
(bury-buffer buffer))=0A=
(let* ((window (if buffer (get-buffer-window buffer)))=0A=
(repl-buffer (slime-output-buffer t))=0A=
(repl-window (get-buffer-window repl-buffer)))=0A=
(cond (repl-window=0A=
(when window=0A=
(delete-window window)))=0A=
(window=0A=
(set-window-buffer window repl-buffer))=0A=
(t=0A=
(pop-to-buffer repl-buffer)=0A=
(goto-char (point-max)))))))=0A=
)=0A=
=0A=
;; update default value of inferior-lisp-program to "cm.sh"=0A=
(if (or (not (boundp 'inferior-lisp-program))=0A=
(not inferior-lisp-program)=0A=
(equal inferior-lisp-program "lisp"))=0A=
(setq inferior-lisp-program =0A=
(or (locate-library "bin/cm.sh" t)=0A=
"cm")))=0A=
=0A=
;; add music extensions if not already present...=0A=
(loop for mode in '(("\\.clm$" . lisp-mode)=0A=
("\\.cm$" . lisp-mode)=0A=
("\\.cmn$" . lisp-mode)=0A=
("\\.ins$" . lisp-mode)=0A=
("\\.fms$" . lisp-mode)=0A=
("\\.asd$" . lisp-mode))=0A=
do (add-to-list 'auto-mode-alist mode))=0A=
=0A=
;; add music-related ignored file types...=0A=
(loop for type in '(".midi" ".mid" ".snd" ".aiff" ".wav" ".osc"=0A=
".fas" ".dfas" ".fasl" ".lib" ".ppcf" ".so"=0A=
".dylib")=0A=
do (add-to-list 'completion-ignored-extensions type))=0A=
=0A=
;; set lisp buffers to slime mode...=0A=
(add-hook 'inferior-lisp-mode-hook=0A=
(lambda ()=0A=
(slime-mode t)=0A=
(setq indent-tabs-mode nil)=0A=
))=0A=
=0A=
;; Important! send (cm) command to Swank after cm starts up...=0A=
(add-hook 'slime-connected-hook=0A=
(lambda () (slime-repl-send-string "(cm)")))=0A=
=0A=
;; Darwin: define COMMAND-E to evaluate expr a la MCL.=0A=
(if (equal system-type 'darwin)=0A=
(global-set-key [(alt e)] 'slime-eval-expr))=0A=
=0A=
(defun cm (program )=0A=
"Start CM"=0A=
(interactive (list (if prefix-arg=0A=
(read-string "Command to start CM: " "cm") =0A=
nil)))=0A=
(if (slime-connected-p)=0A=
(switch-to-buffer (slime-repl-buffer))=0A=
(let ()=0A=
(when program (setq inferior-lisp-program program))=0A=
(slime)=0A=
(claim-scratch-buffer)=0A=
)))=0A=
=0A=
(defun kill-cm ()=0A=
"Kill *slime-repl* and all associated buffers."=0A=
(interactive)=0A=
(slime-repl-sayoonara))=0A=
=0A=
(defun enable-cm-commands ()=0A=
(interactive )=0A=
;; 1 stroke switching between repl and last editing buffer=0A=
(global-set-key (kbd "<f8>") 'slime-toggle-repl)=0A=
;; eval before at or after point, region, or whole defun on whitespae=0A=
(define-key slime-mode-map (kbd "\C-x\C-e") 'slime-eval-expr)=0A=
;; indent line or region=0A=
(define-key slime-mode-map (kbd "TAB") 'slime-indent-anything)=0A=
;; lookup cm function at point=0A=
(define-key slime-mode-map (kbd "\C-c\C-dc") 'cm-lookup)=0A=
)=0A=
=0A=
(defun slime-toggle-repl ()=0A=
"Toggle between *slime-repl* and last lisp buffer."=0A=
(interactive)=0A=
(if (slime-connected-p)=0A=
(let ((repl (slime-repl-buffer)))=0A=
(if repl=0A=
(let ((this (current-buffer))=0A=
next)=0A=
(if (eq repl this)=0A=
(setq next (loop for b in (buffer-list)=0A=
when (with-current-buffer b=0A=
(eq major-mode 'lisp-mode))=0A=
return b))=0A=
(setq next (slime-repl-buffer)))=0A=
(when next=0A=
;;(pop-to-buffer next)=0A=
;;(switch-to-buffer-other-frame next)=0A=
(switch-to-buffer next)))))))=0A=
=0A=
(defun claim-scratch-buffer ()=0A=
;; if scratch buffer is empty set to slime mode with cm package.=0A=
(let ((scratch (get-buffer "*scratch*")))=0A=
(if scratch=0A=
(if (not (buffer-modified-p scratch))=0A=
(with-current-buffer scratch=0A=
(lisp-mode)=0A=
(setq slime-buffer-package "cm")=0A=
(insert (format "(in-package :cm)\n\n"))=0A=
(goto-char (point-max)))))))=0A=
=0A=
(defun slime-eval-expr ()=0A=
"Evals expr before point, at point, around point, whole region."=0A=
(interactive)=0A=
(if (and mark-active (not (null (mark))))=0A=
(slime-eval-region (region-beginning) (region-end))=0A=
(let ((wspace '(?\ ?\t ?\r ?\n))=0A=
(left-char (char-before))=0A=
(right-char (char-after))=0A=
left-side right-side)=0A=
(setq left-side=0A=
(if (or (not left-char)=0A=
(member left-char wspace)=0A=
(member left-char '(?\( )))=0A=
(point)=0A=
(save-excursion=0A=
(backward-sexp)=0A=
(point))))=0A=
(setq right-side=0A=
(if (or (not right-char)=0A=
(member right-char wspace)=0A=
(member right-char '(?\) ))=0A=
;; dont look ahead if different sexp leftward=0A=
(and (< left-side (point))=0A=
(char-equal left-char ?\))))=0A=
(point)=0A=
(save-excursion=0A=
(forward-sexp)=0A=
(point))))=0A=
(if (equal left-side right-side) =0A=
nil=0A=
(slime-interactive-eval=0A=
(buffer-substring-no-properties left-side right-side))))))=0A=
=0A=
(defun slime-indent-anything ()=0A=
"Do line indentation/symbol completion; indent region if=0A=
selected; indent whole defun if prefixed."=0A=
(interactive)=0A=
(if current-prefix-arg=0A=
(slime-reindent-defun )=0A=
(if (and (and mark-active (not (null (mark))))=0A=
(> (count-lines (region-beginning) (region-end)) 1))=0A=
(lisp-indent-region (region-beginning) (region-end))=0A=
(slime-indent-and-complete-symbol))))=0A=
=0A=
=0A=
=0A=
;;;=0A=
;;; CM documentation hacks, mostly cribbed from hyperspec.=0A=
;;;=0A=
=0A=
(defvar *common-music-doc-root* "http://commonmusic.sf.net/doc/"=0A=
"The root url for visiting CM documentation.")=0A=
=0A=
(defun cm-doc (url)=0A=
(interactive "FCM document:")=0A=
(browse-url (concatenate 'string *common-music-doc-root*=0A=
url)))=0A=
=0A=
(defun cm-lookup (entry)=0A=
(interactive (list=0A=
(let* ((it (thing-at-point 'symbol))=0A=
(sy (and it (downcase it))))=0A=
(if (and sy (intern-soft sy *common-music-symbols*))=0A=
sy=0A=
(completing-read "Lookup CM symbol: "=0A=
*common-music-symbols*=0A=
#'boundp t nil nil nil)))))=0A=
(if entry=0A=
(let ((sym (intern-soft (downcase entry) *common-music-symbols*)))=0A=
(if (and sym (boundp sym))=0A=
(cm-doc (car (symbol-value sym)))))))=0A=
=0A=
;; "Common Music" as first list item added, otherwise error under=0A=
;; xemacs 21.4.19, when used by next easy-menu-add-item call=0A=
;; Robert Matovinovic, 20.07.2006, robert.matovinovic@web.de=0A=
(defvar *common-music-doc-menu*=0A=
`("Common Music"=0A=
[ "Home Page" (cm-doc "cm.html") t]=0A=
[ "Installing" (cm-doc "install.html") t]=0A=
[ "Working in Emacs" (cm-doc "emacs.html") t]=0A=
"--"=0A=
[ "Tutorials" (cm-doc "../etc/tutorials/") t]=0A=
[ "Examples" (cm-doc "../etc/examples/") t]=0A=
"--"=0A=
[ "Dictionary" (cm-doc "dict/index.html") t]=0A=
[ "Lookup..." cm-lookup t]=0A=
))=0A=
=0A=
;; last argument changed to make it workable under xemacs 21.4.19=0A=
;; see also definition of *common-music-doc-menu* above=0A=
;; Robert Matovinovic, 20.07.2006, robert.matovinovic@web.de=0A=
(easy-menu-add-item menubar-slime=0A=
'("Documentation")=0A=
*common-music-doc-menu*)=0A=
;; following lines don't work under xemacs 21.4.19,=0A=
;; (easy-menu-create-menu "Common Music"=0A=
;; *common-music-doc-menu*))=0A=
=0A=
(defvar *common-music-symbols* (make-vector 66 0))=0A=
=0A=
(mapcar=0A=
(lambda (entry)=0A=
(let ((symbol (intern (car entry)=0A=
*common-music-symbols*)))=0A=
(if (boundp symbol)=0A=
(push (cadr entry) (symbol-value symbol))=0A=
(set symbol (cdr entry)))))=0A=
;; *** generate by loading "/Lisp/cm/doc/dict/index.lisp"=0A=
'(=0A=
; warning: /Lisp/cm/doc/dict/osc-stream-cls.html has no <title> tag.=0A=
; warning: /Lisp/cm/doc/dict/sc-file-cls.html has no <title> tag.=0A=
; warning: /Lisp/cm/doc/dict/sc-stream-cls.html has no <title> tag.=0A=
("*beat*" "dict/beat-var.html")=0A=
("*chromatic-scale*" "dict/chromatic-scale-var.html")=0A=
("*loudest*" "dict/loudest-var.html")=0A=
("*midi-channel-map*" "dict/midi-channel-map-var.html")=0A=
("*midi-connections*" "dict/midi-connections-var.html")=0A=
("*portmidi-default-filter*" =
"dict/portmidi-topic.html#*portmidi-default-filter*")=0A=
("*portmidi-default-inbuf-size*" =
"dict/portmidi-topic.html#*portmidi-default-inbuf-size*")=0A=
("*portmidi-default-input*" =
"dict/portmidi-topic.html#*portmidi-default-input*")=0A=
("*portmidi-default-latency*" =
"dict/portmidi-topic.html#*portmidi-default-latency*")=0A=
("*portmidi-default-mask*" =
"dict/portmidi-topic.html#*portmidi-default-mask*")=0A=
("*portmidi-default-outbuf-size*" =
"dict/portmidi-topic.html#*portmidi-default-outbuf-size*")=0A=
("*portmidi-default-output*" =
"dict/portmidi-topic.html#*portmidi-default-output*")=0A=
("*power*" "dict/power-var.html")=0A=
("*scale*" "dict/scale-var.html")=0A=
("*softest*" "dict/softest-var.html")=0A=
("*tempo*" "dict/tempo-var.html")=0A=
("accumulation" "dict/accumulation-cls.html")=0A=
("active-sensing-p" "dict/midi-topic.html#active-sensing-p")=0A=
("active-sensing-route" "dict/midi-topic.html#active-sensing-route")=0A=
("amplitude" "dict/amplitude-fn.html")=0A=
("append-object" "dict/append-object-fn.html")=0A=
("audio-file" "dict/audio-file-cls.html")=0A=
("axis" "dict/axis-fn.html")=0A=
("axis" "dict/axis-cls.html")=0A=
("between" "dict/between-fn.html")=0A=
("cable-select-cable" "dict/midi-topic.html#cable-select-cable")=0A=
("cable-select-p" "dict/midi-topic.html#cable-select-p")=0A=
("cable-select-route" "dict/midi-topic.html#cable-select-route")=0A=
("cd" "dict/cd-fn.html")=0A=
("cents->scaler" "dict/cents-gtscaler-fn.html")=0A=
("channel-message-channel" =
"dict/midi-topic.html#channel-message-channel")=0A=
("channel-message-data1" "dict/midi-topic.html#channel-message-data1")=0A=
("channel-message-data2" "dict/midi-topic.html#channel-message-data2")=0A=
("channel-message-opcode" =
"dict/midi-topic.html#channel-message-opcode")=0A=
("channel-message-p" "dict/midi-topic.html#channel-message-p")=0A=
("channel-pressure-channel" =
"dict/midi-topic.html#channel-pressure-channel")=0A=
("channel-pressure-p" "dict/midi-topic.html#channel-pressure-p")=0A=
("channel-pressure-pressure" =
"dict/midi-topic.html#channel-pressure-pressure")=0A=
("chord" "dict/chord-cls.html")=0A=
("clm-file" "dict/clm-file-cls.html")=0A=
("cm-version" "dict/cm-version-fn.html")=0A=
("cm.sh" "dict/cm-sh.html")=0A=
("cmio" "dict/cmio-fn.html")=0A=
("cmn" "dict/cmn-cls.html")=0A=
("cmn-file" "dict/cmn-file-cls.html")=0A=
("continue-p" "dict/midi-topic.html#continue-p")=0A=
("continue-route" "dict/midi-topic.html#continue-route")=0A=
("control-change-channel" =
"dict/midi-topic.html#control-change-channel")=0A=
("control-change-controller" =
"dict/midi-topic.html#control-change-controller")=0A=
("control-change-p" "dict/midi-topic.html#control-change-p")=0A=
("control-change-value" "dict/midi-topic.html#control-change-value")=0A=
("copier" "dict/copier-cls.html")=0A=
("copy-object" "dict/copy-object-fn.html")=0A=
("copyright-note-p" "dict/midi-topic.html#copyright-note-p")=0A=
("cue-point-p" "dict/midi-topic.html#cue-point-p")=0A=
("cycle" "dict/cycle-cls.html")=0A=
("date-and-time" "dict/date-and-time-fn.html")=0A=
("decimals" "dict/decimals-fn.html")=0A=
("decode-interval" "dict/decode-interval-fn.html")=0A=
("defaxis" "dict/defaxis-mac.html")=0A=
("defobject" "dict/defobject-mac.html")=0A=
("doeach" "dict/doeach-mac.html")=0A=
("drunk" "dict/drunk-fn.html")=0A=
("dumposc" "dict/dumposc-fn.html")=0A=
("eod?" "dict/eodqmk-fn.html")=0A=
("eop?" "dict/eopqmk-fn.html")=0A=
("eot-p" "dict/midi-topic.html#eot-p")=0A=
("eox-p" "dict/midi-topic.html#eox-p")=0A=
("eox-route" "dict/midi-topic.html#eox-route")=0A=
("events" "dict/events-fn.html")=0A=
("expl" "dict/expl-fn.html")=0A=
("explseg" "dict/explseg-fn.html")=0A=
("explsegs" "dict/explsegs-fn.html")=0A=
("f" "dict/f-cls.html")=0A=
("false" "dict/false-var.html")=0A=
("find-object" "dict/find-object-fn.html")=0A=
("fit" "dict/fit-fn.html")=0A=
("fm-spectrum" "dict/fm-spectrum-fn.html")=0A=
("fold-objects" "dict/fold-objects-fn.html")=0A=
("fomus-file" "dict/fomus-file-cls.html")=0A=
("graph" "dict/graph-cls.html")=0A=
("harmonics" "dict/harmonics-fn.html")=0A=
("heap" "dict/heap-cls.html")=0A=
("hertz" "dict/hertz-fn.html")=0A=
("histogram" "dict/histogram-fn.html")=0A=
("i" "dict/i-cls.html")=0A=
("import-events" "dict/import-events-fn.html")=0A=
("input" "dict/input-fn.html")=0A=
("insert-object" "dict/insert-object-fn.html")=0A=
("instrument-name-p" "dict/midi-topic.html#instrument-name-p")=0A=
("interp" "dict/interp-fn.html")=0A=
("interpl" "dict/interpl-fn.html")=0A=
("interval" "dict/interval-fn.html")=0A=
("invert" "dict/invert-fn.html")=0A=
("io" "dict/io-mac.html")=0A=
("join" "dict/join-cls.html")=0A=
("key-pressure-channel" "dict/midi-topic.html#key-pressure-channel")=0A=
("key-pressure-key" "dict/midi-topic.html#key-pressure-key")=0A=
("key-pressure-p" "dict/midi-topic.html#key-pressure-p")=0A=
("key-pressure-pressure" "dict/midi-topic.html#key-pressure-pressure")=0A=
("key-signature-p" "dict/midi-topic.html#key-signature-p")=0A=
("keynum" "dict/keynum-fn.html")=0A=
("line" "dict/line-cls.html")=0A=
("list-named-objects" "dict/list-named-objects-fn.html")=0A=
("list-objects" "dict/list-objects-fn.html")=0A=
("log-axis" "dict/log-axis-cls.html")=0A=
("lookup" "dict/lookup-fn.html")=0A=
("lyric-p" "dict/midi-topic.html#lyric-p")=0A=
("make-active-sensing" "dict/midi-topic.html#make-active-sensing")=0A=
("make-cable-select" "dict/midi-topic.html#make-cable-select")=0A=
("make-channel-message" "dict/midi-topic.html#make-channel-message")=0A=
("make-channel-pressure" "dict/midi-topic.html#make-channel-pressure")=0A=
("make-cm" "dict/make-cm-fn.html")=0A=
("make-continue" "dict/midi-topic.html#make-continue")=0A=
("make-control-change" "dict/midi-topic.html#make-control-change")=0A=
("make-copyright-note" "dict/midi-topic.html#make-copyright-note")=0A=
("make-cue-point" "dict/midi-topic.html#make-cue-point")=0A=
("make-eot" "dict/midi-topic.html#make-eot")=0A=
("make-eox" "dict/midi-topic.html#make-eox")=0A=
("make-instrument-name" "dict/midi-topic.html#make-instrument-name")=0A=
("make-key-pressure" "dict/midi-topic.html#make-key-pressure")=0A=
("make-key-signature" "dict/midi-topic.html#make-key-signature")=0A=
("make-lyric" "dict/midi-topic.html#make-lyric")=0A=
("make-marker" "dict/midi-topic.html#make-marker")=0A=
("make-meta-message" "dict/midi-topic.html#make-meta-message")=0A=
("make-midi-channel" "dict/midi-topic.html#make-midi-channel")=0A=
("make-midi-port" "dict/midi-topic.html#make-midi-port")=0A=
("make-mtc-quarter-frame" =
"dict/midi-topic.html#make-mtc-quarter-frame")=0A=
("make-note-off" "dict/midi-topic.html#make-note-off")=0A=
("make-note-on" "dict/midi-topic.html#make-note-on")=0A=
("make-pitch-bend" "dict/midi-topic.html#make-pitch-bend")=0A=
("make-program-change" "dict/midi-topic.html#make-program-change")=0A=
("make-sequence-number" "dict/midi-topic.html#make-sequence-number")=0A=
("make-sequencer-event" "dict/midi-topic.html#make-sequencer-event")=0A=
("make-sequence_track-name" =
"dict/midi-topic.html#make-sequence_track-name")=0A=
("make-smpte-offset" "dict/midi-topic.html#make-smpte-offset")=0A=
("make-song-position" "dict/midi-topic.html#make-song-position")=0A=
("make-song-select" "dict/midi-topic.html#make-song-select")=0A=
("make-start" "dict/midi-topic.html#make-start")=0A=
("make-stop" "dict/midi-topic.html#make-stop")=0A=
("make-sysex" "dict/midi-topic.html#make-sysex")=0A=
("make-system-message" "dict/midi-topic.html#make-system-message")=0A=
("make-system-reset" "dict/midi-topic.html#make-system-reset")=0A=
("make-tempo-change" "dict/midi-topic.html#make-tempo-change")=0A=
("make-text-event" "dict/midi-topic.html#make-text-event")=0A=
("make-time-signature" "dict/midi-topic.html#make-time-signature")=0A=
("make-timing-clock" "dict/midi-topic.html#make-timing-clock")=0A=
("make-timing-tick" "dict/midi-topic.html#make-timing-tick")=0A=
("make-tune-request" "dict/midi-topic.html#make-tune-request")=0A=
("map-objects" "dict/map-objects-fn.html")=0A=
("map-pattern-data" "dict/map-pattern-data-fn.html")=0A=
("map-subcontainers" "dict/map-subcontainers-fn.html")=0A=
("map-subobjects" "dict/map-subobjects-fn.html")=0A=
("marker-p" "dict/midi-topic.html#marker-p")=0A=
("markov" "dict/markov-cls.html")=0A=
("markov-analyze" "dict/markov-analyze-fn.html")=0A=
("meta-message-p" "dict/midi-topic.html#meta-message-p")=0A=
("meta-message-type" "dict/midi-topic.html#meta-message-type")=0A=
("midi" "dict/midi-cls.html")=0A=
("midi-chan-event" "dict/midi-chan-event-cls.html")=0A=
("midi-channel-p" "dict/midi-topic.html#midi-channel-p")=0A=
("midi-channel-pressure" "dict/midi-channel-pressure-cls.html")=0A=
("midi-control-change" "dict/midi-control-change-cls.html")=0A=
("midi-copy-message" "dict/midi-topic.html#midi-copy-message")=0A=
("midi-eot" "dict/midi-eot-cls.html")=0A=
("midi-file" "dict/midi-file-cls.html")=0A=
("midi-file-print" "dict/midi-file-print-fn.html")=0A=
("midi-key-pressure" "dict/midi-key-pressure-cls.html")=0A=
("midi-key-signature" "dict/midi-key-signature-cls.html")=0A=
("midi-note-off" "dict/midi-note-off-cls.html")=0A=
("midi-note-on" "dict/midi-note-on-cls.html")=0A=
("midi-pitch-bend" "dict/midi-pitch-bend-cls.html")=0A=
("midi-port-event" "dict/midi-port-event-cls.html")=0A=
("midi-port-p" "dict/midi-topic.html#midi-port-p")=0A=
("midi-print-message" "dict/midi-topic.html#midi-print-message")=0A=
("midi-program-change" "dict/midi-program-change-cls.html")=0A=
("midi-sequence-number" "dict/midi-sequence-number-cls.html")=0A=
("midi-sequencer-event" "dict/midi-sequencer-event-cls.html")=0A=
("midi-smpte-offset" "dict/midi-smpte-offset-cls.html")=0A=
("midi-stream" "dict/midi-stream-cls.html")=0A=
("midi-system-event" "dict/midi-system-event-cls.html")=0A=
("midi-tempo-change" "dict/midi-tempo-change-cls.html")=0A=
("midi-text-event" "dict/midi-text-event-cls.html")=0A=
("midi-time-signature" "dict/midi-time-signature-cls.html")=0A=
("midishare-open" "dict/midishare-topic.html#midishare-open")=0A=
("midishare-open?" "dict/midishare-topic.html#midishare-open?")=0A=
("mode" "dict/mode-cls.html")=0A=
("ms:midiprintev" "dict/midishare-topic.html#ms:midiprintev")=0A=
("ms:new" "dict/midishare-topic.html#ms:new")=0A=
("mtc-quarter-frame-nibble" =
"dict/midi-topic.html#mtc-quarter-frame-nibble")=0A=
("mtc-quarter-frame-p" "dict/midi-topic.html#mtc-quarter-frame-p")=0A=
("mtc-quarter-frame-route" =
"dict/midi-topic.html#mtc-quarter-frame-route")=0A=
("mtc-quarter-frame-tag" "dict/midi-topic.html#mtc-quarter-frame-tag")=0A=
("new" "dict/new-mac.html")=0A=
("next" "dict/next-fn.html")=0A=
("note" "dict/note-fn.html")=0A=
("note-accidental" "dict/note-accidental-fn.html")=0A=
("note-name" "dict/note-name-fn.html")=0A=
("note-off-channel" "dict/midi-topic.html#note-off-channel")=0A=
("note-off-key" "dict/midi-topic.html#note-off-key")=0A=
("note-off-p" "dict/midi-topic.html#note-off-p")=0A=
("note-off-velocity" "dict/midi-topic.html#note-off-velocity")=0A=
("note-on-channel" "dict/midi-topic.html#note-on-channel")=0A=
("note-on-key" "dict/midi-topic.html#note-on-key")=0A=
("note-on-p" "dict/midi-topic.html#note-on-p")=0A=
("note-on-velocity" "dict/midi-topic.html#note-on-velocity")=0A=
("now" "dict/now-fn.html")=0A=
("object->cmn" "dict/object-gtcmn-fn.html")=0A=
("object-name" "dict/object-name-fn.html")=0A=
("object-parameters" "dict/object-parameters-fn.html")=0A=
("object-time" "dict/object-time-fn.html")=0A=
("octave-number" "dict/octave-number-fn.html")=0A=
("odds" "dict/odds-fn.html")=0A=
("output" "dict/output-fn.html")=0A=
("palindrome" "dict/palindrome-cls.html")=0A=
("pattern-state" "dict/pattern-state-fn.html")=0A=
("pattern-value" "dict/pattern-value-fn.html")=0A=
("pattern?" "dict/patternqmk-fn.html")=0A=
("pick" "dict/pick-fn.html")=0A=
("pickl" "dict/pickl-fn.html")=0A=
("pitch-bend-channel" "dict/midi-topic.html#pitch-bend-channel")=0A=
("pitch-bend-lsb" "dict/midi-topic.html#pitch-bend-lsb")=0A=
("pitch-bend-msb" "dict/midi-topic.html#pitch-bend-msb")=0A=
("pitch-bend-p" "dict/midi-topic.html#pitch-bend-p")=0A=
("pitch-class" "dict/pitch-class-fn.html")=0A=
("play" "dict/play-fn.html")=0A=
("plotter" "dict/plotter-fn.html")=0A=
("plotter-add-layer" "dict/plotter-add-layer-fn.html")=0A=
("plotter-data" "dict/plotter-data-fn.html")=0A=
("plotter-front-styling" "dict/plotter-front-styling-fn.html")=0A=
("plotter-property" "dict/plotter-property-fn.html")=0A=
("plotter-redraw" "dict/plotter-redraw-fn.html")=0A=
("plotter-redraw" "dict/plotter-close-fn.html")=0A=
("plotter-scroll" "dict/plotter-scroll-fn.html")=0A=
("plotter-zoom" "dict/plotter-zoom-fn.html")=0A=
("pm:countdevices" "dict/portmidi-topic.html#pm:countdevices")=0A=
("pm:getdefaultinputdeviceid" =
"dict/portmidi-topic.html#pm:getdefaultinputdeviceid")=0A=
("pm:getdefaultoutputdeviceid" =
"dict/portmidi-topic.html#pm:getdefaultoutputdeviceid")=0A=
("pm:getdeviceinfo" "dict/portmidi-topic.html#pm:getdeviceinfo")=0A=
("pm:time" "dict/portmidi-topic.html#pm:time")=0A=
("point" "dict/point-cls.html")=0A=
("portmidi-close" "dict/portmidi-topic.html#portmidi-close")=0A=
("portmidi-open" "dict/portmidi-topic.html#portmidi-open")=0A=
("portmidi-open?" "dict/portmidi-topic.html#portmidi-open?")=0A=
("portmidi-record!" "dict/portmidi-topic.html#portmidi-record")=0A=
("portmidi-stream" "dict/portmidi-topic.html#portmidi-stream")=0A=
("prime-form" "dict/prime-form-fn.html")=0A=
("process" "dict/process-mac.html")=0A=
("program-change-channel" =
"dict/midi-topic.html#program-change-channel")=0A=
("program-change-p" "dict/midi-topic.html#program-change-p")=0A=
("program-change-program" =
"dict/midi-topic.html#program-change-program")=0A=
("pval" "dict/pval-mac.html")=0A=
("pval" "dict/pval-cls.html")=0A=
("pwd" "dict/pwd-fn.html")=0A=
("quantize" "dict/quantize-fn.html")=0A=
("ran" "dict/ran-fn.html")=0A=
("range" "dict/range-cls.html")=0A=
("ransegs" "dict/ransegs-fn.html")=0A=
("receive" "dict/receive-fn.html")=0A=
("receiver?" "dict/receiverqmk-fn.html")=0A=
("remove-object" "dict/remove-object-fn.html")=0A=
("remove-receiver!" "dict/remove-receiver-fn.html")=0A=
("remove-subobjects" "dict/remove-subobjects-fn.html")=0A=
("rescale" "dict/rescale-fn.html")=0A=
("rescale-envelope" "dict/rescale-envelope-fn.html")=0A=
("rewrite" "dict/rewrite-cls.html")=0A=
("rewrite-generation" "dict/rewrite-generation-fn.html")=0A=
("rhythm" "dict/rhythm-fn.html")=0A=
("rm-spectrum" "dict/rm-spectrum-fn.html")=0A=
("rotation" "dict/rotation-cls.html")=0A=
("rts" "dict/rts-fn.html")=0A=
("rts-continue" "dict/rts-continue-fn.html")=0A=
("rts-pause" "dict/rts-pause-fn.html")=0A=
("rts-stop" "dict/rts-stop-fn.html")=0A=
("rts?" "dict/rtsqmk-fn.html")=0A=
("save-object" "dict/save-object-fn.html")=0A=
("sc-clearsched" "dict/supercollider-topic.html#sc-clearsched")=0A=
("sc-close" "dict/supercollider-topic.html#sc-close")=0A=
("sc-dumposc" "dict/supercollider-topic.html#sc-dumposc")=0A=
("sc-flush" "dict/supercollider-topic.html#sc-flush")=0A=
("sc-notify" "dict/supercollider-topic.html#sc-notify")=0A=
("sc-open" "dict/supercollider-topic.html#sc-open")=0A=
("sc-open?" "dict/supercollider-topic.html#sc-open?")=0A=
("sc-quit" "dict/supercollider-topic.html#sc-quit")=0A=
("scale-max" "dict/scale-max-fn.html")=0A=
("scale-min" "dict/scale-min-fn.html")=0A=
("scale-mod" "dict/scale-mod-fn.html")=0A=
("scale-order" "dict/scale-order-fn.html")=0A=
("scale<" "dict/scalelt-fn.html")=0A=
("scale<=3D" "dict/scalelteql-fn.html")=0A=
("scale=3D" "dict/scaleeql-fn.html")=0A=
("scale>" "dict/scalegt-fn.html")=0A=
("scale>=3D" "dict/scalegteql-fn.html")=0A=
("scaler->cents" "dict/scaler-gtcents-fn.html")=0A=
("sco-file" "dict/sco-file-cls.html")=0A=
("seq" "dict/seq-cls.html")=0A=
("sequence-number-p" "dict/midi-topic.html#sequence-number-p")=0A=
("sequencer-event-p" "dict/midi-topic.html#sequencer-event-p")=0A=
("sequence_track-name-p" "dict/midi-topic.html#sequence_track-name-p")=0A=
("set-clm-output-hook!" "dict/set-clm-output-hook-fn.html")=0A=
("set-midi-output-hook!" "dict/set-midi-output-hook-fn.html")=0A=
("set-receiver!" "dict/set-receiver-fn.html")=0A=
("set-sco-output-hook!" "dict/set-sco-output-hook-fn.html")=0A=
("shell" "dict/shell-fn.html")=0A=
("shuffle" "dict/shuffle-fn.html")=0A=
("smpte-offset-p" "dict/midi-topic.html#smpte-offset-p")=0A=
("song-position-lsb" "dict/midi-topic.html#song-position-lsb")=0A=
("song-position-msb" "dict/midi-topic.html#song-position-msb")=0A=
("song-position-p" "dict/midi-topic.html#song-position-p")=0A=
("song-position-route" "dict/midi-topic.html#song-position-route")=0A=
("song-select-p" "dict/midi-topic.html#song-select-p")=0A=
("song-select-route" "dict/midi-topic.html#song-select-route")=0A=
("song-select-song" "dict/midi-topic.html#song-select-song")=0A=
("sprout" "dict/sprout-fn.html")=0A=
("start-p" "dict/midi-topic.html#start-p")=0A=
("start-route" "dict/midi-topic.html#start-route")=0A=
("stop" "dict/stop-fn.html")=0A=
("stop-p" "dict/midi-topic.html#stop-p")=0A=
("stop-route" "dict/midi-topic.html#stop-route")=0A=
("subcontainers" "dict/subcontainers-fn.html")=0A=
("subobjects" "dict/subobjects-fn.html")=0A=
("sv" "dict/sv-mac.html")=0A=
("sv*" "dict/svstar-mac.html")=0A=
("sv+" "dict/svplus-mac.html")=0A=
("sysex-p" "dict/midi-topic.html#sysex-p")=0A=
("sysex-route" "dict/midi-topic.html#sysex-route")=0A=
("system-message-data1" "dict/midi-topic.html#system-message-data1")=0A=
("system-message-data2" "dict/midi-topic.html#system-message-data2")=0A=
("system-message-p" "dict/midi-topic.html#system-message-p")=0A=
("system-message-route" "dict/midi-topic.html#system-message-route")=0A=
("system-message-status" "dict/midi-topic.html#system-message-status")=0A=
("system-reset-p" "dict/midi-topic.html#system-reset-p")=0A=
("system-reset-route" "dict/midi-topic.html#system-reset-route")=0A=
("tempo-change-p" "dict/midi-topic.html#tempo-change-p")=0A=
("tendency" "dict/tendency-fn.html")=0A=
("text-event-p" "dict/midi-topic.html#text-event-p")=0A=
("thunk" "dict/thunk-cls.html")=0A=
("time-signature-p" "dict/midi-topic.html#time-signature-p")=0A=
("timing-clock-p" "dict/midi-topic.html#timing-clock-p")=0A=
("timing-clock-route" "dict/midi-topic.html#timing-clock-route")=0A=
("timing-tick-p" "dict/midi-topic.html#timing-tick-p")=0A=
("timing-tick-route" "dict/midi-topic.html#timing-tick-route")=0A=
("transpose" "dict/transpose-fn.html")=0A=
("transposer" "dict/transposer-cls.html")=0A=
("true" "dict/true-var.html")=0A=
("tune-request-p" "dict/midi-topic.html#tune-request-p")=0A=
("tune-request-route" "dict/midi-topic.html#tune-request-route")=0A=
("tuning" "dict/tuning-cls.html")=0A=
("use-system" "dict/use-system-fn.html")=0A=
("vary" "dict/vary-fn.html")=0A=
("wait" "dict/wait-fn.html")=0A=
("wait-until" "dict/wait-until-fn.html")=0A=
("weighting" "dict/weighting-cls.html"))=0A=
)=0A=
=0A=
;; eof=0A=
=0A=
=0A=
=0A=
=0A=
------=_NextPart_000_001E_01C6AB96.248C0CC0--