LA停電

その他

らしいです。僕はGlendaleのViewpointsのオフィスに行って、昼ごろGlendaleの家に帰ったのですが、2回ほど電圧の低下を感じた(というか蛍光灯の点灯状態が二回ほどおかしくなった)だけで個人的には悪影響は余りありませんでした。

さすが第三世界。過去の停電記事はhttp://d.hatena.ne.jp/squeaker/searchdiary?word=%c4%e4%c5%c5を参照。

SkypeとeBay

その他

eBayがSkypeを買収(へ)。
http://www.skype.com/company/news/2005/skype_ebay.html

26億ドルですか。

「XEROX」が「コピー」の意味であるように、「eBay」が「ネットオークション」の意味なんですが、日本で話していて、「ネットオークションで売ったら？」という冗談の意味で「eBayで売ったら？」と言うと、「ん？」という顔をされることもありました。そういうときには「ヤフオクで」と言い直したりするのですが、Skype経由でeBayの名が知られていけば、だんだん状況も変わるかもしれません。

ニュースリリースにもあるようにオークションのやりとりを音声でもできるように、という相乗効果も謳われています。トラブル防止と新たな種類のトラブル源のどちらにでもなりそう。

慶応からのギャンブラー

その他

松澤君と岡田君は明日帰国の途に着かれるのだが、この週末はLas Vegasで人生をエンジョイしてきたそうである。ギャンブルもちゃんとプラスになったそうだ。

というわけで、彼らと一緒にPF Changに行ったのだが、まっちゃんの意外な弱点が判明して面白かった。

昔の訳 (むかしのわけ、ではない)

Squeak

なんだかすっかり忘れ去られていたが、実はSqueak 3.8以前、というかBabel以前には別種の翻訳機構があって、スワヒリ語とかノルウェー語とかスウェーデン語とかが入っていた。
それらをは200語句くらいの訳しかなく、4000語句とかを必要とする今のシステムではそのままは使えないのだが、いちおう取っ掛かりでもあると継続してくれる人が出るかもしれないので、LanguageEditorにロードできるファイルを作成。

Workspaceプログラミングだけど、こんな感じです。add...のメソッドをfileOutしておいて、中を配列の配列にEmacsで書き換えておき、以下を実行します。

f _ FileStream readOnlyFileNamed:  'C:\squeak\Squeak3.6\EToyVocabulary-templateForLanguageTranslation.st'.
f converter: UTF8TextConverter new.

template _ Compiler evaluate: f contentsOfEntireFile.
f close.

f _ FileStream readOnlyFileNamed:  'C:\squeak\Squeak3.6\EToyVocabulary-addSwedishVocabulary.st'.
f converter: UTF8TextConverter new.

swedish _ Compiler evaluate: f contentsOfEntireFile.
f close.

templateDict _ Dictionary new.
templateHelpDict _ Dictionary new.
template do: [:list |
	list do: [:triplet |
		templateDict at: triplet first put: triplet second.
		templateHelpDict at: triplet first put: triplet third.
]].

results _ Dictionary new.
kiswahili do: [:list |
	list do: [:triplet |
		results at: (templateDict at: triplet first) asString put: (triplet second) asString.
		results at: (templateHelpDict at: triplet first) asString put: (triplet third) asString.
	].
].

n _ NaturalLanguageTranslator isoLanguage: 'sv'.
results associationsDo: [:pair | n phrase: pair key translation: pair value].
n saveToFileNamed: 'sv.translation'.

10月末から11月頭

その他

10月末から11月頭に日本にいます。面白そうなイベント(公私ともども)ありそうな人は教えてください。見たことのない人に見たことのない人を見せて差し上げられるかもしれません。