[Mew-Win32 00515] Re: can not compile ras.c on Win95

[Shun-ichi GOTO]

後藤＠太陽計測です

>>>>> "山口" == YAMAGUCHI, Shuhei <yamagus at example.com> writes:
山口> うーん、全部のメッセージがくっついて、うまくいかないです。 ;_;
山口> メッセージのprintf()の後にfflush(stdout)入れても、いくつかくっついて表
山口> 示されちゃう…。

くっついちゃう問題に関しては、こんな風にするとよいのでは？
＃なんて言うほどのコードじゃないですが。。。


(defvar ras-saved-line nil)
(defvar ras-dialup-prog-name "ras.exe")

(defun ras-dialup-filter (proc output)
  (setq ras-saved-line (concat ras-saved-line output))
  (while (string-match "\\([^\n]+\\)\n" ras-saved-line)
    (message "[RAS] %s" (substring ras-saved-line
				   (match-beginning 1)
				   (match-end 1)))
    (setq ras-saved-line (substring ras-saved-line (match-end 0)))
    ))

(defun ras-dialup (num)
  (let (proc)
    (setq proc (start-process "ras-dial"
			      nil
			      ras-dialup-prog-name "-c" (int-to-string num)))
    (set-process-filter proc 'ras-dialup-filter)
    (set-process-sentinel proc '(lambda (proc event) 
				  (message "connected")))
    proc))


さて、あれこれ作るかもしれないこれからに向けて、
Mewにとっては、dial-upのために希望仕様をあげていかねば。。。
  1. 外部プログラムにはどんな機能を求められるか？（必要最小限）
  2. Mule/Meadow上ではMewにどういうインターフェースが欲しいか？
  3. それは必要か？ どういうメリットがあるか？

--- Regards,
 Shun-ichi Goto  <gotoh at example.com>
   R&D Group, TAIYO Corp., Tokyo, JAPAN