標準Packageに含まれているSpeak.n/SpeakMachine[]関数は、
Speak[]関数がメッセージをおくる先を指定する関数のようですが、
動作しないようです。
SpeakMachine[m_String, p$_:1] := Module[{},
Speak$FD[p$] = UDPOpen[m, Speak$PortBase+p$];
];
と変更したところ、思ったように動作しているようです。
（他のサイトではあまり関係ないかとはおもいますが）標準packageで
変更しておいていただけるとありがたく存じます。
> 標準Packageに含まれているSpeak.n/SpeakMachine[]関数は、
> Speak[]関数がメッセージをおくる先を指定する関数のようですが、
> 動作しないようです。
>
> SpeakMachine[m_String, p$_:1] := Module[{},
> Speak$FD[p$] = UDPOpen[m, Speak$PortBase+p$];
> ];
>
> と変更したところ、思ったように動作しているようです。
>
> （他のサイトではあまり関係ないかとはおもいますが）標準packageで
> 変更しておいていただけるとありがたく存じます。
>
yamamotoさんは、sadistメンバーのはずなので commitすれば良いかと思います
(パッチレビューを希望するのであれば、diff形式で投稿すれば良いかと)
他に指摘するのであれば、
* GetSpeakStatus[]にも同様の問題がある
* Speak[]中にハードコードされているマジックIPv4 130.87.82.216自体が美しくない
> > 標準Packageに含まれているSpeak.n/SpeakMachine[]関数は、
> > Speak[]関数がメッセージをおくる先を指定する関数のようですが、
> > 動作しないようです。
> >
> > SpeakMachine[m_String, p$_:1] := Module[{},
> > Speak$FD[p$] = UDPOpen[m, Speak$PortBase+p$];
> > ];
> >
> > と変更したところ、思ったように動作しているようです。
> >
> > （他のサイトではあまり関係ないかとはおもいますが）標準packageで
> > 変更しておいていただけるとありがたく存じます。
> >
> yamamotoさんは、sadistメンバーのはずなので commitすれば良いかと思います
> (パッチレビューを希望するのであれば、diff形式で投稿すれば良いかと)
見直しはじめると、もう少し変えたくなってきました。
SpaeakMachineをAutoloadの対象にする必要もありました。
>
> 他に指摘するのであれば、
> * GetSpeakStatus[]にも同様の問題がある
> * Speak[]中にハードコードされているマジックIPv4 130.87.82.216自体が美しくない
おっしゃるとおりです。SpeakMachineが動作するようになれば、init.local.nなどで設定することもできるかとおもいます。