comint is silent

[Joe Corneli]

In musical-letters.el, which I just posted on gnu-emacs-sources, I
provide functions for interfacing with the fluidsynth software
synthesizer from within emacs.

The best way to do this would I think be to run fluidsynth as a
comint process.

Code like this does that:

(make-comint "fluid" "fluidsynth" nil (eval 
                                       (cons 'concat (mapcar
                                                      (lambda (font) 
                                                        (concat 
                                                         
musical-letters-font-path font " ")) 
                                                      musical-letters-fonts))))

The last little bit loads soundfonts for fluidsynth -- in the
implementation I just posted to gnu-emacs-sources, the process that
runs should be something like:

fluidsynth -n ~/sf2/VintageDreamsWaves-v2.sf2 ~/sf2/fenderbass.sf2 
~/sf2/rhodespianoice.sf2 

The problem is, the fluidsynth process that is generated this way
does not produce any sound!

By contrast, if I create a fluidsynth process using the following
method, it produces sounds just fine.

        (shell "*fluid*")
        (insert 
         (concat "fluidsynth -n "
                 ;; load up the fonts
                 (eval 
                  (cons 'concat (mapcar
                                 (lambda (font) 
                                   (concat 
                                    musical-letters-font-path font " ")) 
                                 musical-letters-fonts)))))
        (comint-send-input))

This method has its own bugs, which I'll discuss in a separate email.


In GNU Emacs 21.3.50.4 (powerpc-apple-darwin7.2.0, X toolkit, Xaw3d scroll bars)
 of 2004-04-29 on hope-of-a-stone.local
configured using `configure '--with-x' '--without-carbon' 
'CFLAGS=-I/sw/include' 'CPPFLAGS=-I/sw/include' 'LDFLAGS=-L/sw/lib''

Important settings:
  value of $LC_ALL: nil
  value of $LC_COLLATE: nil
  value of $LC_CTYPE: nil
  value of $LC_MESSAGES: nil
  value of $LC_MONETARY: nil
  value of $LC_NUMERIC: nil
  value of $LC_TIME: nil
  value of $LANG: nil
  locale-coding-system: nil
  default-enable-multibyte-characters: t

Major mode: Shell

Minor modes in effect:
  auto-image-file-mode: t
  show-paren-mode: t
  display-time-mode: t
  mouse-wheel-mode: t
  global-font-lock-mode: t
  font-lock-mode: t
  unify-8859-on-encoding-mode: t
  column-number-mode: t
  line-number-mode: t
  transient-mark-mode: t

Recent input:
C-e <down> <down> <down> <down> C-e <down> M-w <up> 
<up> <up> <up> <up> C-a C-x C-s C-x b l i <tab> <return> 
M-x <up> <return> M-x <up> <return> a o u i s n h a 
o e u s n h o C-x C-g C-x b <return> C-x b * s h <tab> 
<return> c d SPC ~ / s i t <tab> <return> l s <return> 
s c p SPC m u s <tab> SPC $ E M . / a / e l i s p / 
<return> M-x r e p o <tab> r <tab> <return>

Recent messages:
Wrote /Users/arided/site-lisp/musical-letters.el
Musical-Letters mode disabled
ansi-color-process-output: Marker does not point anywhere
Completing file name...
Completed
~/site-lisp 
Completing file name...
Partially completed
Auto-saving...done
Making completion list...