舌足らずなブログ

Win64でnewLISPをコンパイルする

2011-10-08T08:33:00.001+09:00

newLISPのソースコードを改造して、Win64環境でコンパイルできるようしてみました。64ビットプログラミングの練習とnewlispの内部動作を調べることを目的とした個人的なビルドなので、とりあえず動く程度の出来なのは勘弁してください。基にしたnewLISPのバージョンはv.10.3.3です。作成したバイナリはこのエントリの最下に置いておきます。GPLライセンスに則るならソースか差分パッチも公開すべきなんだろうけどどうしよう…。パッケージに同梱しているマニュアル(doc/INSTALL)によるとnewLISPがコンパイル可能なメモリモデルはILP32とLP64のみらしく、Win64のメモリモデルであるLLP64はサポートされていない様子。 newLISPではlong型を基本として、整数もポインタも同じビット長として扱っているため、その辺も考慮してソースを改造する必要

newLISP v.10.3.2リリースノート翻訳

2011-07-29T01:07:00.002+09:00

安定版となるnewLISP v.10.3.2がリリースされていたのでリリースノートをざっくりと翻訳。 →newLISPダウンロードページとりあえず、newlisp本体とjson.lspが文字列内部のunicodeエスケープ(\unnnn)を解釈してくれるようになったこと、ココには載ってないけどget-urlのカスタムヘッダーのバグが修正されたことが嬉しい。原文はこちら。配布ファイルのdoc/CHANGESも参照のこと。 newLISP® v.10.3.2 リリースノート Addtions (追加機能) 文字列が処理可能なクオート文字にUnicodeエンコードを追加。例として"\u03b1\u03b2\u03b3"はギリシャ文字"αβγ"に変換される。この機能はUTF8版newLISPで利用できる。 Other

[newLISP]cygwinでのコンパイルを通す

2011-06-14T13:09:00.000+09:00

cygwinからnewlispをコンパイルしようとすると nl-sock.c:2010: error: ‘ICMP6_FILTER’ undeclared (first use in this function) と言われてコンパイルエラーが起こってしまうので、それを解決します。 $CYGWIN/usr/include/netinet/icmp6.h があるかどうか確認する。あれば2.を飛ばして3.へ。 GNU謹製のicmp6.hを拾ってきて1.のパスに追加する。（→icmp6.h GNU - Google 検索） ※cygwinのインストーラに上記のヘッダがあれば尚良しですが、見つけられなかったので… 以下のパッチを参考に nl-sock.c を書き換える。 --- nl-sock.c.orig Tue Jun 14 12:52:46 2011 +++ nl-sock.c Tue

端末の表示崩れをなんとかする

2011-06-10T12:20:00.001+09:00

ターミナルの表示が崩れたときの対処法 - Clouder::Bloggerより。少し改良端末上でバイナリファイルの中身をうっかり出力させてしまってウィンドウの表示がえらいことになることが時々あったので、この解決方法はありがたいです。ただしBSD由来のshでは、echoコマンドがエスケープシーケンスを理解するためのオプション(-e)を理解してくれないので注意（ksh,zshなど他のシェルまでは分かりませんが）。参考リンク ASCII Table - ANSI Escape sequences (ANSI Escape codes) - VT100 / VT52 VT100 Escape Codes

ユニークなURL

2011-06-08T06:43:00.000+09:00

URLの短さとサービスのシンプルさが面白いなーと感心したサイト。若干ネタっぽいですが。 ifconfig.me ifconfigコマンドのようなネットワーク情報（というよりブラウザ情報）を返してくれるサービス。端末上で curl ifconfig.me と打ち込めば自分のIPアドレスが返ってくるなど、ブラウザだけでなく端末から利用する際にも重宝する。JSON, XML形式にも対応している。 jsonip.com 名前の通り、自分のIPアドレスをJSON形式で返すだけのサービス。 URLにパス名を指定するとコールバック形式のJSONが返ってくる。 http://jsonip.com/getip => getip({"ip":"72.14.203.191"}); httpstat.us HTTPステータスコードを返すだけのサービス。例えば httpstat.us/200 と打

めんまフォント

2011-05-28T17:49:00.001+09:00

アニメ「あの日見た花の名前を僕達はまだ知らない。」の公式ページで配布されている「めんまフォント」が気になったのでインストールしてみた。…が英数字や記号の一部が表示されないおかげでかゆうま（初代バイオハザード：飼育員の日記）に見えてしまう件。ちなみにxyzzyでは利用できないみたい。同じTrueTypeフォントのARISAKAフォントやうずらフォントは使えるのになぜ？あの花オリジナルめんまフォントダウンロードあの日見た花の名前を僕達はまだ知らない。| アニメ公式サイト

いろいろ

2011-05-28T16:35:00.000+09:00

マシンの新調デスクトップPC＋Windows7買いました。今までのノートPCが5年以上前のモノのため、さすがにスペック的に見劣りしてたので。新マシンはHPの100円アップグレードキャンペーンから選択。 OSを64ビット版Windows7にしたり、プロセッサをAMDのPhenom II X6にしたりと色々冒険してみましたが、まあ何とかなるかと思います。メモリ2Gはおそらく買い替えになるんだろうな…。レンタルサーバー実験してみたいことがあったのでアイネットディー様のレンタルサーバーの激安プランを借りてみました。URLはlambda.que.jpです。レンタルサーバーを選ぶにあたって気に入ったのは、OSが今まで触ったことのなかったFreeBSDだったことと、格安プランでもSSHが利用できる点ですね。あまり迷惑がかかることはできませんが、自前でプログラムをコンパイルもできるので

今日の無題

2011-05-14T20:04:00.000+09:00

昨日Bloggerにログインしようとしたらこんなメッセージが表れたので、メンテナンス中かと思ったらどうやら結構深刻な障害だったらしい。現在は復旧している様子。 Blogger Buzz: Blogger is back GoogleのBloggerサービス、20時間以上にわたる障害から復旧 - ねとらぼ

newLISPのコード片を貼り付けるサイト

2011-04-05T22:37:00.003+09:00

Pastebin.comがnewLISPのシンタックスハイライトに対応しているらしいので試しに貼り付けてみる。見た目は他のSchemeのシンタックスとあまり変わらないから分かりにくいけど、ちゃんとキーワードが強調表示されているみたい。探してみたら他にもあったので手当たり次第にリンクしておこう。基本関数へのマニュアルリンクが付与されるおまけつきとか。なにこれ素敵じゃない。 KDE Pastebin Utility [example] Stirkbin - Pastebin [example] TdCT’s paste » Bienvenue ! [example] pzt.me » Welcome! [example]

It works!

2011-03-14T11:32:00.000+09:00

11日に発生した東北地方太平洋沖地震ですが、私の住んでいる新潟は軽く揺れた程度で大きな被害はありませんでした。知り合いと身内もどうやら無事みたい。といっても未だに余震が続いている状態なので油断はできませんが…。報告は以上。またいつも通りの生活に戻ります。

今日の無題

2011-02-16T18:23:00.001+09:00

2chのCentOSスレよりバックアップツールに関する話題とリンクがあったのでメモ用にコピペ。なんとなく個人利用向けとはツールとは違う気もするが… ※CSSは2chブラウザ Chaika のものを拝借。以前書いた情報がすっかり古くなったので書き直し。現在(2010年11月時点)の安定版はnewlisp v.10.2.8 開発版はnewlisp v.10.2.17です。このページは以下のURLと配布ファイルに同梱しているREADMEを参考に作成しています。 newLISP - Downloads ダウンロードページすべてのファイル- http://www.newlisp.org/downloads/ モジュール - http://www.newlisp.org/modules/ 開発版 - http://www.newlisp.org/downloads/development/ 配布されているtarballの中身

今年読んだ本

2010-10-30T06:29:00.004+09:00

なんとなく、今年(2010年)買った技術書を列挙してみる。プログラミング言語系 JavaScript: The Good Parts ―「良いパーツ」によるベストプラクティス Pythonチュートリアル第2版開発ツール入門git 入門SSH GDBハンドブック HTML & CSS ビジュアル・リファレンス改訂版その他 Software Design 総集編【2000~2009】(DVD付) Puzzles for Hackers:スクリプトキディから大人のハッカーへ (IT Architects' Archive 知の連環) Winnyの技術後は図書館とか大学の蔵書をちょこちょこと。「プログラミングClojure」や「Scheme手習い」などのLisp系の書籍は面白そうと思いながらも結局買ってなかったな…

[Emacs]Unicodeエスケープ文字を復元する

2010-09-08T08:30:00.016+09:00

\u0040\u006b\u006f\u0073\u0068\u005f\u0062\u006f\u0074 上記のようなUnicodeエスケープ文字を元の文字列に戻すためのEmacs Lispです。ついでなので逆のエスケープする関数も書いておきます。 xyzzyの方は単純にElispのコードを書き換えただけ。xyzzyはemacsより書き方に幅があるようだけど、あんまりトリッキーなコードだとelisp<=>xyzzy間のコードの移植が大変になりそう。 emacsでこんな感じの置換操作を行う場合は以下のように書くのが定石らしい。 (while (re-search-forward "検索したい文字列" nil t) (replace-match "置換後の文字列" nil 'リテラルかどうか)) xyzzyならストリームを扱う関数を作ってed::

今日の無題

2010-07-20T12:49:00.002+09:00

Debian4.0終了のお知らせ(遅) 10/01/21 Debian GNU/Linux 4.0 へのセキュリティサポートが終了します 10/05/22 Debian GNU/Linux 4.0 更新 10/06/02 Debian 4.0 "Etch" の全パッケージが archive.debian.org へ移動します半年くらい前にインストールしたcoLinuxを久々に引っ張りだしてみたら、どうやら Debian-4.0r0-etch.ext3 ではディストリビューションのバージョンが少々古くなってしまったらしい。 apt-getが使えないと色々困るので Debian -- ディストリビューションアーカイブに書いてあるのを参考に /etc/apt/sources.list

[Emacs]sha1-file

2010-05-31T23:39:00.002+09:00

舌足らずなブログ: あれ？がようやく解決したのでメモ。こっちもxyzzyのエンコーディング指定と同じミスでした。 sha1.elはそれなりに長い文字列を受け取ると外部プロセスに処理を投げるので、その時の入力をバイナリ指定にしないといけないらしい。 (defun sha1-file (filename) (require 'sha1) (let ((coding-system-for-write 'binary)) (with-temp-buffer (insert-file-contents filename) (sha1 (buffer-string))))) ちなみにEmacs内部で処理する場合はエンコーディング指定は要らない。 (let ((sha1-use-external nil)) (with-temp-buffer

[newLISP]今日の無題

2010-05-19T11:25:00.008+09:00

自作したnewlisp.elの挙動がおかしかった原因が少し分かったのでメモ。newlispのREPLはデフォルトで行編集ライブラリ(readline)が使えるが、複数行を入力する場合は[cmd]~[/cmd]タグでS式を囲まなければいけないのが newlispの面倒な仕様。newlisp.elの newlisp-eval関数はその辺を考慮してプロセスに文字列を送るようにしているのだけど、なぜか効果が無いようでREPLバッファに入力が溜まってしまう現象がよく起きていた。 (defun newlisp-eval (str-sexp) "Eval newlisp s-expression." (interactive "snewLISP Eval: ") (let ((proc (newlisp-process))) (labels ((sendln (str)

テスト投稿

2010-05-16T06:01:00.002+09:00

テストですよー curl+newLISPからBloggerに投稿するテスト関連リンク Blogger API - Google Code (newLISPer): Posting to Google Blogger using newLISP Google Data API Tips: Post on Blogger using curl Big Sky :: curlを使ってコマンドラインからGDataにログインし、picasaに画像をアップロードする letter: [Common Lisp] Emacs Muse で書いて、Common Lisp 経由で Blogger に投稿する

newLISP基礎文法最速マスター

2010-02-09T08:18:00.013+09:00

待っていても誰も書きそうにないので自分で作りました。これは何？Lisp風スクリプト言語newLISPの文法一覧です。(→newLISP公式ページ) S式について多少でも知っている人は他の処理系と比較してもよし。そもそもS式を知らない人はLisp入門にしてもよし。 (先に他の有名なScheme処理系やCommon Lispに手を出す方が無難ですが) newLISPの簡易リファレンスとして利用できるかと思います。ただし無保証です。基礎対話環境として使う$ newlisp -C newLISP v.10.1.7 on Win32 IPv4 UTF-8, execute 'newlisp -h' for more info. > _ スクリプトを実行する$ newlisp file.lsp 評価コマンドラインからの利用では、複数行にわたるS式の評価は[cmd]~[/cmd]タグを用

[xyzzy]zone.l移植

2010-02-01T07:30:00.003+09:00

Emacsのジョークプログラムzone.elを移植したのでGitHubに置いておきますね。壁||´･ω･`)っ kosh04/xyzzy-lisp/site-lisp/zone.l※コード内の説明文はシフトJISなのでブラウザから開くとたぶん文字化けしますん。

Scheme コードバトンに参加

2010-01-30T02:51:00.011+09:00

次回3月予定のShibuya.lispに向けて、現在面白げな企画が進行中です。 Shibuya.lisp に向けて Scheme コードバトンするのはどうか？第1回 Scheme コードバトンのお知らせ - ひげぽん OSとか作っちゃうかMona- ;; ■ これは何か？ ;; Scheme のコードをバトンのように回していき面白い物ができあがるのを楽しむ遊びです。 ;; 次回 Shibuya.lisp で成果を発表します。 ;; Scheme 初心者のコードを書くきっかけに、中級者には他人のコードを読む機会になればと思います。 ;; ;; ■ 2 つのルール ;; ;; (1)自分がこれだと思える変更をコードに加えて2日以内に次の人にまわしてください。 ;; 「人に優しい」変更なら何でも良い。1文字の変更でも可。 ;; 「人に優しい」とは例えば、次の人が読みやすいコードを書

今日の無題

2010-01-15T00:32:00.001+09:00

小野和俊のブログ:成長しないプログラマーの7つの悪習慣 4つほど該当。ただ、自分にとって不満な事柄を「人のせいにする」のではなく「自分のせいにして無限ループに陥る」ことも悪習慣の一つなんじゃないかな。。今年は少しずつでいいから出来ることを噛み締めて形にしていこうと思います。

[xyzzy]分かったけど解決はしていない

2010-01-07T22:34:00.003+09:00

xyzzyを初期化ファイルなし(xyzzy.exe -q)で起動するとメニューバーの [表示]->[ツールバー]部分が表示されない問題の原因が分かったのでメモ。これはどうやらツールバーメニューの初期化を行う関数 (ed::load-command-bar-info) が *load-history-hook* から呼び出されていて、さらにこのフック変数を実行する関数 (load-history-file) が.xyzzyのロードと共に呼び出されている為に -q オプションを指定して起動するとツールバーメニューが空になる現象が起こるらしい。 ;; estartup.l:148: (unless no-init-file (trap-errors (let ((*loading-user-initial-file* t)) (load (namestring

[VLC][クリスマス]あと数日ですよ

2009-12-21T20:10:00.007+09:00

今年もやはりVLC media playerのアイコンがクリスマス仕様になっている様子。こういう遊び心のあるソフトウェアは個人的に好感がもてます。そして多分、今回も年明けまでこのアイコンのままだと予想。 →去年のスクリーンショット

今日の無題

2009-12-08T04:06:00.008+09:00

対応するプラットフォームの多さ[1]が魅力の一つのnewLISPですが、MaemoというOSベースのインターネットタブレット"N810"に移植した人がいるようです。 (apply newLisp Maemo) guiserver(Javaで書かれたnewLISPのGUI環境)も稼動するようでリンク先の参考画像はなかなか派手目。CUIの起動画面にも凝っていてちょっとカッコイイです。 [1] Linux, MacOSX, FreeBSD, OpenBSD, NetBSD, Solaris/SunOS, Win32(MinGW) などなど関連リンク newlisp on the Nokia N810 Internet tablet -n ewlispfanclub.alh.net Maemo OS - Wikipedia N810 - Google 画像検索

[Emacs]eldocをほんの少し便利にする

2009-11-30T01:50:00.006+09:00

LISPファイルの編集時に関数の引数を表示するマイナーモードとして、Emacsではeldoc-mode、CLではslime-autodoc-modeがあるんですが、両者の表示形式が微妙に異なることが気になったのでついカッとなってeldocの方を軽く改造しました。反省はしていない。 gist: 244937 - GitHub 参考画像を見れば分かると思いますが、ポイント位置の引数の強調方法がデフォルトでは太字ではなくハイライトになってます。その他、関数・変数ともにdocstringの表示が可能です。ソースコードはGistに置いておくのでinstall-elispからインストールすればCL(SLIME)使いは幸せになれるかもしれません。 (install-elisp-from-gist 244937 "eldoc.el") 動作環境 Emacs22以上で動作確認。

[Emacs]そんなことよりeval-after-load使おうぜ

2009-11-11T08:30:00.004+09:00

もっと使われてもいいのにと思うEmacsの設定周りのメモ。 [関数] (eval-after-load FILE FORM) この関数は、指定されたライブラリFILEがロードされているときにのみ2番目の引数FORMを評価するというもの。例えばmigemoをロードする時の自分の設定はこんな感じ。 ;; migemoを読み込む。存在しない場合はnilを返す (load "migemo" 'noerror) (eval-after-load "migemo" (quote (progn ;; この辺がmigemoをロードした後に評価される (defadvice isearch-mode (before migemo-off activate) "初期状態は常にnil" (setq migemo-isearch-enable-p nil)

Swank server for newLISP

2009-09-12T19:21:00.003+09:00

ひっそりと更新。以前挑戦した「newLISPをSLIMEから動かす」が、一応お遊び程度に完成したので公開してみます。 http://github.com/kosh04/newlisp-files/tree/master >> swank-newlisp.lsp 簡単なREPLが使えるくらいで、SLIMEの特徴であるシンボル名の補完、定義ファイルへのジャンプなどなど実装されていない残念な出来です。

今朝の無題

2009-07-15T08:30:00.006+09:00

Lispは未来に生きている - リリカル☆Lisp開発日記 - http://blog.bugyo.tk/lyrical/2009/02/lisp-15.html そろそろCLのuniversal-timeがキリ番になりますね。 --- そういえば自分のGitHubのリポジトリをちまちま更新しました。主に個人用に作っているのでフォローしている人がいるとなんだか申し訳ない気分です。今のところの更新頻度は emacs-lisp > newlisp-files >> xyzzy-lisp こんな感じです（左に行くほど頻度が高い）。研究室の端末がDebianなのでEmacsを弄りがちで、xyzzyとの挙動の違いを自作のxyzzy.elで埋めるのが主な目的。 --- それにしてもnewLISPは話題に乗りませんねー。毎回検索の上位にこのブログが入っているのを見ると嬉

TeXのバージョンが円周率に近づいているらしい

2009-07-10T23:20:00.007+09:00

ということが「LaTeX2e 美文書作成入門」に書かれていて、なんだかトリビアを覚えた気分です。（・∀・)つ〃∩ﾍｪｰﾍｪｰﾍｪｰLaTeXで物書きをしている人にとっては常識だったりするんでしょうか、コレ。以下書籍より引用（ただし手元にあるのは改訂第4版ではなく初版） ...そして，TEX第3.1版(1990年)の時点で次のような終結宣言をしました。もうこれ以上TEXは拡張しない。もし新しい不具合があれば修正して第3.14版，第3.141版，第3.1415版，...と番号を進めていき，自分の死と同時に第π版とする。それ以後はどんな不具合があっても誰も手をつけてはならない。 TEXに関することはすべて文書化したので，このノウハウを生かして新たにソフトを作ることは自由である。 TeX - Wikipedia http://ja.wikipedia.org/

[VT100]アスキーアニメーション[AA]

2009-07-09T21:05:00.003+09:00

端末エミュレータのエスケープシーケンスを使ったアスキーアニメなんてものがある事を知ったのでちょっと自分でキャプチャしてみました。画像はGIFファイルです。やり方は簡単で、エスケープシーケンスを含むテキストファイル(*.vt)を端末エミュレータで表示するだけ。ただしファイルの中身は一行づつ、パラパラ漫画のように時間差で表示させる方がいいみたいです(catコマンドを使うとアニメーションを見る余裕なく表示されてしまうので)。今回はこの時間差表示を実現するためにnewlispをスクリプトとして使っていますが、端末で実行できるならCでも他のスクリプト言語で書いてもたぶんOK。しかしこのアスキーアニメーション、実際に表示(というより再生)するために当時の人は何の呪文を使っていたんでしょうかね。使用したnewlispのソースは以下ウィンドウのキャプチャ方法上の画像は

今日の無題

2009-07-07T17:20:00.002+09:00

このブログ(Blogger)に自作の動画を貼り付けようと思ったらGoogleVideoへのアップロードはすでに停止されていたというオチ。 Official Google Video Blog: Turning Down Uploads at Google Video- http://googlevideo.blogspot.com/2009/01/turning-down-uploads-at-google-video.html

あれ？

2009-06-29T18:00:00.003+09:00

別にそれほど困った話ではないけど、xyzzyのsha-1,emacsのsha1関数を使ったファイルのチェックサムを求める方法がよく分からない。テストしたファイルは newLISPv10.1(UTF-8_win32) SHA1(newlisp.dll)= 5ef2a160350fde6312baa2a6fa3d964c308f7faf SHA1(newlisp.exe)= 561ff028b606c3671393848e279b845c5fdf60c1 で、以下が結果。 # [cygwin] /cygdrive/c/Program Files/newlisp$ sha1sum.exe newlisp.exe 561ff028b606c3671393848e279b845c5fdf60c1 *newlisp.exe ;; [xyzzy] (with-open-file (fp

[xyzzy]regexp-optを移植

2009-06-03T08:09:00.009+09:00

Emacsのregexp-opt.elをxyzzyに移植してみました。一応Emacs移植キットは使わずに自前で動くようにしてあります。あまり実用的な出来ではないですが、よかったらどうぞ。 https://github.com/kosh04/xyzzy-lisp/tree -> site-lisp/ -> regexp-opt.l から入手できます。 regexp-opt.elとは?: GNU Emacs Lispリファレンスマニュアル: 探索と一致 -- Function: regexp-opt STRINGS &optional PAREN この関数は、文字列STRINGSのいずれかに一致する効率よい正規表現を返す。これは、たとえばフォントロック（font-lock）モードなどで、可能な限り高速な一致や探索を行う必要がある場合に有用である。

「１０分でコーディング x 2 〜リストの破壊的操作篇〜」を解いてみる

2009-05-26T01:11:00.009+09:00

乗り遅れた感はありますが、g00000さん出題のLISP問題を解いてみました。１０分でコーディング x 2 〜リストの破壊的操作篇〜 - わだばLisperになる - cadrグループリストの破壊的操作 - 日々ごちゃごちゃと考える経由 (1) alistを破壊的にplistに変換する関数(nalist-to-plist)を書いて下さい。 (2) nplist-to-alistも作ってみて下さい。まず自分がやったのは「リストの図を書く」こと。実際は紙の上で考えた。 ;; 連想リスト:alist '((foo . 1) (bar . 2)) +-+ +-+ -->|1|--->|3|--->nil +-+ +-+ | | V V +-+ +-+ |2|->1 |4|->2 +-+

「なぜJAVAなのか」と聞かれたら

2009-05-21T20:42:00.005+09:00

細かい経緯は面倒なんで省略しますが、自分が大学内でLISPの話題をした際に「なんでJAVAでLISPを動かす必要があるの？」と質問されました。特にこれはLISPに限った話ではなく、「なぜ他の言語をJAVAで実装する必要があるのか」ということになりそうです。実際、JAVAで実装されたプログラミング言語は多々あります。 JRuby(ruby) Rhino(javascript) Jython(python) Kawa(scheme) ABCL(common-lisp) JBasic(basic) などなど... で、「なぜJAVAなのか」と聞かれたら「便利だから」と答えたら身も蓋もないし… もうちょっと無い脳みそ振り絞って「何が便利なのか」を考えてみると、特定のプラットフォームに依存しなくなる JAVAとLISPのコード間で双方アクセスが可能になる総じてLISP

DICT:2628

2009-05-20T08:27:00.009+09:00

ubuntuのgnome-dictionaryが簡易辞書として便利なので紹介。ほとんどのリソースは外国語なので英英辞書くらいにはなるかなと思っていたら、日本語用の辞書サーバを提供しているところもあるので漢字の読みを調べることも出来そうです。 # もちろん細かく調べるときは手持ちの電子辞書か英辞郎に頼むんですが GNOME 辞書 - Wikipedia http://nihongobenkyo.org/index_ja.php Web用のインターフェースもあるのでクライアントをインストールする前に試用してみるのも良いかもしれません。 DICT.ORG (英英など) http://nihongobenkyo.org/lookup.php (和英・英和) ちなみに日本語辞書用の辞書サーバなのに、そのサーバはフランスにあるみたい。

今日の無題

2009-05-08T20:17:00.005+09:00

ブログの更新遅れも甚だしい今日この頃ですが、ここにはあんまり技術的でないどーでもいいことを書くのは自分の性格上ためらってしまうのです。 (どちらかといえば口下手か、単に面倒臭がりなだけなんだと思いますがね) さすがに Lisp ばかりに手をつけるわけにもいかないので、とりあえず今はオブジェクト指向の理解のために Java の勉強中。その他書きたいことがあったような気がしたけど、毎度の事で頭の中でとろけてしまったみたいなので、今日はこの辺で。 # だめだこの性格… $ echo *** > /dev/null

GitHubアカウントをとりました

2009-04-19T20:17:00.010+09:00

いくつかファイルを置いておいたので、よかったらどうぞ。 GitHubアカウント - github.com/kosh04 xyzzy/ etc/ newLISP - newlisp-mode用キーワードファイル site-lisp/ cl.l - xyzzyにないCL関数の移植のようなもの corman_search.l - CLのsearch関数移植 cygwin.l - 主にmanコマンドを利用するため newlisp.l - newLISP編集用メジャーモード redef.l - xyzzy組み込み関数を再定義したもの util.l -

今日の無題

2009-04-19T15:40:00.005+09:00

cygwinのパッケージを検索するのに目grepはもうしたくないでござる。 emacsクローンのzileがいつの間にかGNUプロジェクトのパッケージに入っていることに気づいた。 GNU Zile - GNU Project - Free Software Foundation

参考にならないmanコマンドの文字化けについてのメモ

2009-04-16T03:14:00.002+09:00

配属先研究室の端末Emacsのマニュアルコマンドの文字化けが気持ち悪いので、文字コードにはあまり知識がないけど、ない脳みそこねこね考えてみる。あれはDebianだっかかな。 manプロセス側でなく、なるべくEmacs側で処理出来るようにするのが目的です。 --- うちのubuntu環境の文字コードは標準でUTF-8 (getenv "LANG") ; "ja_JP.UTF-8" default-process-coding-system ; (mule-utf-8 . mule-utf-8) locale-coding-system ; utf-8 (1) manプロセスが処理した文字列をそのまま表示すると(つまりエスケープシーケンス処理しない)と、こんな

ubuntu インストール

2009-04-07T02:35:00.006+09:00

windows と併用している linux を vine4.2 から ubuntu-ja-8.10 に変えてみた。 linux のインストールは何度かやったことがあるのでパーティション操作などは特に苦労なし。ubuntu(と言うより GUI)楽だなあ。以前に入れたもといえば opensuse,fedora,vine (LiveCD も含めれば slax,knoppix) …ディスクへのインストールは4度目か。苦労はしなくなったが上達した気がしないなあ。インストールは windows とのデュアルブート。 windows 領域に ubuntu をインストールすることも可能なのだが、以前に knoppix でそれを試した時は、あまり操作感がよろしくなかった印象だったので。マシンスペックが貧弱でなかったら仮想化なんかも出来そうなものだが...

[Gmail]既読ボタンを有効にする

2009-04-06T23:04:00.005+09:00

Google Japan Blog: Gmail Labs が日本語に対応しましたらしい。ちょっと見てみると「既読ボタン」なんてものがあったので早速導入。これは重宝しそうな予感。 Gmail -> 設定 -> Labs -> 既読ボタンの項目を有効にするあと「酒気帯びテスト」ってこれか。 Google、「真夜中のラブレター」を防ぐ「Mail Goggles」 - ITmedia News 実験サービス「Gmail Labs」が日本語化　送信取り消しや「酒気帯びテスト」も - ITmedia News

[Emacs] シンボルから info を呼び出す

2009-04-06T04:30:00.006+09:00

info-lookup-symbol について -- mshkhの日記 http://d.hatena.ne.jp/mshkh/20090404/1238843884 Infoの参照 -- 開発ツールとしての Emacs http://www.netlaputa.ne.jp/~kose/LinuxWorld/#11 指定したシンボルに対応した Info を表示するには `info-lookup-symbol' を使えばいいのか。なるほど。 Elisp 用の Info は標準で入っているので、とりあえず C ライブラリのだけでも入れておくことにする。以下、その手順。 libc の info を持ってくる http://www.gnu.org/software/libc/manual/ http://www.gnu.org/software/libc/manual/

[LISP]マクロのエイリアス

2009-04-03T08:30:00.002+09:00

マクロ名の定義にも setf が使えるらしいことに気づいたのでメモ。ついでに xyzzy だと macro-function に setf 出来ないので定義しておく。たぶん間違ってるけど。 # xyzzy, CLISP-2.44 で確認 #+xyzzy (defsetf macro-function si:*fset) (progn (setf (macro-function 'if-progn) (macro-function 'when)) (list (if-progn t "てー") (if-progn nil "てー"))) ;=> ("てー" NIL) (progn (setf (macro-function '&&) (macro-function 'and)) (list (&& t "てー")

今日のバカ

2009-03-27T08:30:00.003+09:00

なんというか、物凄くくだらない事に真剣になってしまったのでここに断片だけ残して、後で振り返って一人で悶絶しようと思う。 # LISP と全く関係ないですよ。 --- ABABABAABABA BAAABAAA↓→→A→ ←←AA←BAA↓B↓ ↑↑↑BBA ABABABAABABA →←AAAABABBABB↓B ↑BBBBAAAABBBA↑B ↓BBABB→←BBA A (global-set-key #\S-Right (lambda () (interactive) (insert "→"))) (global-set-key #\S-Left (lambda () (interactive) (insert "←"))) (global-set-key #\S-Up (lambda () (interactive) (insert "↑"))) (

[Elisp] font-lock の勉強中

2009-03-24T08:30:00.006+09:00

newLISP を Emacs から弄るなら、関数・シンボルなどのキーワードの色付けは必須項目な訳で、しぶしぶ Google 先生と $EMACS/lisp 内のファイル群を頼りに font-lock について調べています。 xyzzy ならキーワードファイルに単語を放り込んでハッシュで勝手に色分けしてくれるのが楽チンだったんだが… それはよしとして、Elispの色付けといえばこれが便利。 Lisp 関数だけに色付け http://www.bookshelf.jp/cgi-bin/goto.cgi?file=meadow&node=font-lock-func で、紹介されている Elisp のソースをよく見たら、関数定義などは内部で呼び出している関数が一部違うだけで重複している部分が結構あることに最近気づきました。「これはマクロの出番だ」と思い立って書き直

今日の無題

2009-03-22T22:57:00.001+09:00

何気なく Windows Update で新しいフォントを入れたら見事にやられた。 Windows XP および Windows Server 2003 向けJIS2004 対応 MS ゴシック & MS 明朝フォントパッケージについて http://www.microsoft.com/japan/windows/products/windowsvista/jp_font/jis04/default.mspx ぼんやりしていても気づくほどフォントに違和感がありすぎる… しかも主に騒がれていたのは2007年。2年前の問題に反応する自分も自分だなあ。ということでアンインストールさせていただきます

今日の無題

2009-03-18T21:41:00.003+09:00

haloscanどうした？ HaloScan.comのページが文字化けするなと思って HTML ソースを眺めていたら、ヘッダ部分がとなっているんだが、UTF-8 が使えなくなったのだろうか。以前は設定に "Character Encoding" なる項目があったはずなのにいつの間にかそれもなくなってるし。最近買った本入門UNIXシェルプログラミング第2版 --- Bruce Blinn / 山下哲典 (訳) 就活のバカヤロー --- 石渡嶺司 / 大沢仁ふたつのスピカ (12-14) --- 柳沼行

本家にばれてた

2009-03-11T03:12:00.001+09:00

以前書いたEmacs用のnewlisp-modeが本家様に気づかれたようです。さすがマイナー言語。 http://www.newlisp.org/code/newlisp.el というかこれならシンボル補完とか色付けとかもっと頑張ればよかった。最近newLISP弄るのはもっぱらxyzzyからだしなあ。 SLIME+newLISPを完成させるか。。。

Slimy hackathon #1 に参加してきた

2009-03-11T01:57:00.007+09:00

g000001さん発案のSlimy Hackathonにちょこっとだけ参加してきました。ハッカソンとはいえ連絡手段はLingrとSkypeだったので、ほとんど部屋に篭りきり生活でしたが(笑) 自分が行おうとしたタスクは2つ。 #### SLIME⇔Elispのコマンド対応 Common LispもEmacs Lispも元はMACLISPが祖先らしいから、CLの便利関数はきっとelispにもあるに違いないと考えたが始まり。CLのといいますか、SLIMEのコマンドですが。で、出来たのがこれ → http://gist.github.com/75589 もう少しSLIMEに達者になっていればslime-who-callsとかslime-list-callersに対応するelispも探せたんじゃないかなと反省してます。とりあえずelisp-macroexpand-1は作ってみて

ブログのまとめエントリ

2009-03-05T23:35:00.014+09:00

これまで作ったもの、調べたもの。の中からそこそこ有益そうなものリスト。ブログに書いたコードの断片はGitHubの方で纏めているかもです。 GitHubアカウントをとりました xyzzy 関連関数の引数を返す (arglist) 外部コマンドの結果を文字列として出力する (command-substitution) xyzzyを再起動させる (reboot-xyzzy) 辞書引き関連 (edict) 括弧の対応を調べる (check-parens) newLISP メジャーモード (newlisp-mode) その他べんりすぷ

今日の無題

2009-03-03T08:30:00.005+09:00

OnLisp邦訳のwebページが3月末で消滅するので注意しましょう。 (訳者の野田さんの大学院修了のため) ミラーあります→http://www.komaba.utmc.or.jp/~flatline/ 長いコードを貼り付けるのにpaste.lisp.orgはちょっと不便なので、何か別のアカウントをとろうかと考え中。とりあえず候補は gist.github CodeRepos

読書感想文#2

2009-03-03T02:45:00.007+09:00

「Shibuya.lisp テクニカルトーク #2」が無事に開催されたようです。自分はニコニコ動画から見させてもらいました。 →http://www.nicovideo.jp/mylist/11305224 個人的には処理系/性能について語るのもいいけど、それから何か作ってみた系の発表が面白かったかな。やはり動くものは見ていて楽しい。特に印象に残ったTOP3 okuoku氏: SchemeでBluetoothスタックを書く Scheme(mosh)で外部プロトコルの処理をしようとする試み。 Wiiリモコンと通信するデモに思わず感嘆の声。 FFI(Foreign Function Interface)とは違うんだろう、たぶん。和田英一氏: 私がLispでプログラムを書く理由楽しいから←結論本当に楽しそうに話すなあ。ダメ学生の自分はPostscriptプログラム

newLISPの特徴、軽くまとめ

2009-02-27T12:19:00.015+09:00

去年から少しずつ弄っていたnewLISPですが、人様に見せるようなものは出来なかったのでとりあえず使ってみて分かったことだけでも書いておきます。これからnewLISPを使ってみようかと思っている人の参考にでもなれば、と。リンク newLISP - Wikipedia, the free encyclopedia newLISP - Home - 公式ページ newLISPの哲学と歴史 newLISP Fan Club [RSS] - フォーラム Twitter @newlisp マニュアル・リファレンス newLISP Users Manual and Reference - 関数リファレンス、マニュアル newLISP - An Interactive Tutorial - newLISP入門 newLISP Code Patterns Introduction to

[xyzzy]check-parens

2009-02-25T08:30:00.003+09:00

(defun check-parens () "バッファの括弧の釣り合いを調べる." (interactive) (handler-case (let ((home (point))) (goto-char (point-min)) (while (forward-list)) (goto-char home) (message "だいたいあってる") t) (simple-error (c) (message "このへん間違ってるかも") (ding) nil))) (compile 'check-parens) 使い方 lisp-mode、lisp-interaction-modeで M-x: check-parens

[Emacs]tabba.elのせいだったのか

2009-02-24T08:30:00.002+09:00

tabbar-modeを使うと基本的に「M-x b」等は通常操作と同じ一つ前に開いたバッファにもどります。ただ、kill-bufferしたときだけグループ化された前のファイルに戻ります。 Elisp/タブでバッファを切り替えるどうりでkill-bufferしたとき元のバッファに戻らないわけだ。。パッチも紹介されているが、どうやらフック関数のコメントアウトだけなのでelispで修正できる範囲のよう。 (remove-hook 'kill-buffer-hook 'tabbar-buffer-kill-buffer-hook) 直った直った。すっきりした。ちなみにtabbar.elの設定 (require 'tabbar) (tabbar-mode (if window-system 1 -1)) (remove-hook 'kill-buffer-hook '

今日の無題

2009-02-22T13:15:00.002+09:00

ブログトップが真っ白なんですが… --- この記事更新したら直った。なんだったんだろう？

xyzzyのべんりすぷ(汎用編)

2009-02-22T05:31:00.010+09:00

もともとこのブログを作った趣旨が「xyzzyでこんな関数作ったよ、見てね」のつもりだったのに、最近まですっかり忘れていたような気がする今日この頃です。 Xyzzy Wikiに投稿するのもありなんですが、あまりに雑多すぎて分類に困りそうなのでブログの方にしました。（気が小さいなんて言えないです…）普段使っている関数群なので、そこそこ枯れていると思います。 →http://paste.lisp.org/display/75922 以下軽く解説 keyboard-quit ほとんどquitと同じですが、マークがクリアされます。 kill-region(C-w)のうっかりタイプを防ぐ効果があります。（それでもたまに誤爆しますが）リージョンを反転表示するrv-regionとの併用がおすすめ。 ;; 載せるの忘れてた… (global-set-key #\C-g '

今日の無題

2009-02-21T22:01:00.003+09:00

地方県民はUSTREAMで我慢すればいいや、と思っていた結果がこれですか。。。ぐはぁ（泣）今回の発表のUSTREAMでの中継/動画アップロードにつきまして前回のTT#1では、発表者全員より撮影許可を頂けましたので、内容全編を中継/アップロード致しましたが、今回は、すべての発表者の方に撮影承諾を頂けておりませんので、一部内容の中継/アップロードができません。 Shibuya.lisp TT#2 ライトニングトークの発表内容決定!

progvの途中

2009-02-17T11:54:00.006+09:00

(let ((buffer-read-only nil)) (declare (special buffer-read-only)) (hogehoge)) Emacsのような動的束縛を使うなら上のように書くのがたぶん一般的なんだろうけど、動的束縛といえばprogvなんてものがあることに気づいたので以前自分で書いたものを引っ張ってきてみた。 (defmacro progv (symbols values &body body) (let ((label (gensym "progv-form")) (var (eval symbols)) (val (eval values))) `(labels ((,label () ,@body)) ((lambda (,@var) (declare (

今日の無題

2009-02-14T08:30:00.011+09:00

あの時の話、聞かせてください！：第1回電波少年の“なすび”に会いたい！ - R25.jp なんと懐かしい…見ていたのは小・中学時代だったかな。当たった懸賞の品に一喜一憂する姿とか、「当選の舞」とか、ぼさぼさ頭にチョンマゲ姿とか、ポスターか何かを見て下部のなすマークが大きくなったり(!?)とか、とにかく見ていて面白かった。日曜日の深夜が楽しみだったよ。現在のインタビュー時の写真を見て「変わんないなー」とにんまり。当時の電波少年のホームページ(あったんだ)を読みふけって、懐かしさのあまりもう一度にんまりしてしまった。なすびさんも元気そうで何よりですね。この人のポジティブ思考は見習うべきかも。電波少年的懸賞生活 - 日本テレビ

[xyzzy]autoloadされたモジュールの一覧

2009-02-14T08:30:00.010+09:00

xyzzyではロードされたモジュールの一覧はmodulesで参照できるわけですが、 autoload関数で指定された関数は呼び出されるまでロードされません。そういうモジュール一覧を参照出来ないかと思ってこんなものを作りました。利用する箇所が見当たらないので、ネタということで。 http://paste.lisp.org/display/75440 まあ、autoload-function-pを弄っただけなんですが。 find-all-symbolsを使っているのでコンパイルしないと重いです。ところで"hh-call"って何なんでしょう？$XYZZY/lispディレクトリ内には見つからないし、検索してみても答えは出ず。。。HTML-Helpをcallするとか？

[xyzzy]HexlのPatch

2009-02-10T03:43:00.010+09:00

勉強不足以上に実践不足が否めないと思う今日この頃。テストが終わった(笑)のでちまちまとアウトプットをしていこうと思います。まあ、たいしたものではないですが。 Hexl@xyzzyのpatch NANRIさん配布のHexlに対するpatchです。今更な気がするのでひっそりと。 →http://xyzzy.s53.xrea.com/wiki/index.php?patch%2Fpatch%2Fhexl.l 先生、"patch/patch/hexl.l"ってなんですか… ;; Hexlにあると便利そうなおまけ (defun hexl-coloring-hook () "hexl-modeの表示に色を付ける." (make-local-variable 'regexp-keyword-list) (setq regexp-keyword-list (

[CL] 0から1000までに含まれる0をカウントする

2009-01-28T23:09:00.006+09:00

http://d.hatena.ne.jp/rubikitch/20081120 より (count #\0 (format nil "~{~D~}" (loop :for i :from 0 :to 1000 :collect i))) ;=> 193 Commom Lisp は文字列を弄ることが出来るから面白い。

今日の無題

2009-01-28T22:39:00.010+09:00

ああ…期末試験は近いよ Googleが6つのサービスを終了 Googleノートブックは地味に使っていたから残念。 [emacs]Emacs初心者向け記事へのリンク集でもやはり、Emacsの使いにくさを飛び越えて、楽しくなる人はそう簡単に増えないんだろうなとネガティブな予測。ここはひとつ、練習台としてxyzzyを使ってみませんか。 C with lambda(仮) (オレンジニュース経由) C言語にλ式の構文を組み込んだような言語。これはマクロといえばいいのか、それともコンパイラコンパイラ？これは今後に期待。 --- リンク先をsourceforgeに修正 (2009-01-31) Lingrに新たにlisp_learner_groupなる部屋が出来てる！

[PCL]第29回CL勉強会セルフ反省会[CADR]

2009-01-18T01:44:00.007+09:00

反省会というより、単なるログです。 PCL第4章特に疑問はないので省略 Lispマシンエミュレータの話題第29回CL勉強会CADR Lispマシンで遊んでみよう篇の準備物からエミュレータ本体とディスクイメージを落とす今回はchaosサーバは使わないエミュレータは実行形式で配布されているのでコンパイルの必要なし(ソース同梱) Winバイナリもあるけど、色々不便らしいので今回はLinux版を使う以下エミュレータ起動までの手順 [~/lisp/]$ ls chaos-cadr.tar.gz disk.img.tar.gz usim.tar.gz [~/lisp/]$ tar fxvz usim.tar.gz [~/lisp/]$ tar fxvz disk.img.tar [~/lisp/]$ cd usim [~/lisp/usim]$ ln -s ../disk.img

丑年

2009-01-06T00:38:00.005+09:00

2009年の干支は己丑(つちのとうし)。ウシといえばGNUという発想は安直すぎるだろうか… 今年はもう少し自己主張できるようになりたいです。

今日の無題

2008-12-28T12:23:00.000+09:00

そうだ帰省しよう。

'fooと#'fooの違いは環境の違い

2008-12-26T08:30:00.002+09:00

QUOTEとFUNCTIONを使い分ける:もう少し詳しい説明 -- 逆引きCommonLisp をぼんやり見ていて、そういえば FUNCTION と COERCE では環境が違うってうちの CLISP が言ってたのを思い出した。 (funcall '(lambda (x) (1+ x)) 1) ;; => Error ;; *** - FUNCALL: argument (LAMBDA (X) (1+ X)) is not a function. ;; To get a function in the current environment, write (FUNCTION ...). ;; To get a function in the global environment, write (COERCE '... 'FUNCTION). CLHS

あと一週間

2008-12-19T01:23:00.005+09:00

万能プレーヤーである VLC media player の起動アイコンがクリスマス仕様になっている事に気づいた。 Google のトップページが時期によって模様替えされるのは何度か見たけれど、こういう遊びをするソフトウェアって少ないんじゃないかな。

おおえまくすよマクロをつかわないとはなさけない

2008-12-18T07:52:00.008+09:00

(require 'cl) は悪なのか？の続き。気が向いたので軽く調べてみた。 --- GNU Emacs のマニュアルには以下のような注意書きがある。 Common Lisp Extensions Overview Please note: the CL functions are not standard parts of the Emacs Lisp name space, so it is legitimate for users to define them with other, conflicting meanings. To avoid conflicting with those user activities, we have a policy that packages installed in Emacs must not load CL at run

[Emacs] newLISP 環境を構築してみたい

2008-12-15T20:20:00.010+09:00

[追記@2009-04-20T03:29:05] もう少し拡張したものを置いておきます。 http://github.com/kosh04/newlisp-files/tree/master Emacs から newLISP のプロセスを操作する関数群を書いたのでちょっと醸してみます。もともと xyzzylisp 用に作ったんだけど、やっぱり資産がある elisp の方が短くできてしまったので。使い方: 以下の URL のコードを newlisp.el で保存して eval-buffer。 http://paste.lisp.org/display/72178 必要に応じて、以下の変数を書き換え。 newlisp バイナリのパス名: *newlisp-command* プロセス間文字コード: *newlisp-process-coding-system*

(require 'cl) は悪なのか？

2008-12-15T11:26:00.002+09:00

自分の中で Emacs Lisp の CL パッケージの評判があまりよろしくない印象なんだが、はっきりした理由を聞いたことがないなあ。気が向いたらまとめのページが無いか詮索してみよう。 →詮索した。

elisp にもラベル記法があったのか

2008-12-15T08:30:00.008+09:00

(let ((print-circle t) (lst '(7 8 3 9 4 0 1 6 5 2))) (princ (list (sort lst #'<) lst)) (terpri)) ;-> ((0 1 2 3 4 5 6 . #1=(7 8 9)) #1#) ;=> t ((lambda (x) ((lambda (y1) ((lambda (&optional y2) ((lambda (z) (list x y1 y2 z)) (car (cdr #1=(cdr #2='(1 (2) 3)))))) (car (cdr #3=(car #1#))))) (car #3#))) (car #2#)) ;=> (1 2 nil 3) ;; 上のコード

newLISP v.10.0 インストールメモ

2008-12-12T22:15:00.010+09:00

newLISP v.10.0 がリリースされていました newLISP v.10.0 Release Notes インストーラも用意されていますが、せっかくなので野良ビルドしてみようかなと以下手順を列挙 Makefile の typo 修正: 41c41 < @echo " make linux # newlisp for LINUX --- > @echo " make linux # newlisp for LINUX" 47,48c47,48 < @echi " make debian # newlisp for UBUNTU debian with readline support" < @echi " make debian_utf8 # newlisp for UBUNTU

あったら便利だと思う

2008-12-07T23:38:00.008+09:00

パス名も setf で変更できたらいいのに (setf (pathname-type "/home/kosh/foo.l") "lsp") ;=> "/home/kosh/foo.lsp" パッと思いついたもの。これだと置換する文字数同じでないとダメだし、ファイル名とディレクトリ名が被ると面倒だなあ。やはり make-pathname だろうか (and (setf (subseq #1="C:/home/xyzzy/xyzzy.exe" (search (pathname-type #1#) #1#)) "mp3") #1#) ;=> "C:/home/xyzzy/xyzzy.mp3" [追記] 2008-12-13T20:16:43+09:00 初めから make-pathname 使おうと思

メモ化のメモ

2008-12-06T01:34:00.005+09:00

再帰関数を効率の良いコードに直せ、と言われてパッと思い浮かぶのがループに還元末尾再帰これくらいしかないと思ってた。メモ化なんて選択肢もあるのね。関数の値のメモワイズ -- On Lisp (邦訳) 計算コストの高い関数を同じ引数で複数回呼び出したいときがあるなら，値をメモワイズ(memoize)しておくのが得だ．以前の返り値をみな保管しておき，関数が呼び出される度にまず保管場所を見て，値が既に得られていないか調べる． memoize 関数のコードはここでは省くとして、ハッシュをキャッシュに使えるのかと知ってひとつ賢くなった気分。 ;; ベタベタな2重再帰フィボナッチ定義 (setf (symbol-function 'fibo) (memoize #'(lambda (n) (cond ((= n 0) 0)

xyzzy を再起動させる

2008-11-30T18:19:00.008+09:00

新しいネタを提供する気力がないので手元にある既存のものを。 (defun reboot-xyzzy (&optional cleanup) "xyzzyを再起動する." (interactive "P") ;; ついでに初期化する (when cleanup (delete-file (si:dump-image-path) :if-does-not-exist :skip) (let ((siteinit (find-load-path "siteinit"))) (and siteinit (string-match "\\.lc$" siteinit) (delete-file siteinit)))) (cond ((modified-buffer-exist-p) (

ネット断食

2008-11-28T23:34:00.002+09:00

この間の日曜日未明からルータの調子がおかしかったのかネットワークから遮断された生活を送っていました。今日の夕方からようやく回復。しかし原因は不明。まあ、あれだ。ネットがなくても生きていけることを身を以て知ることができただけ良しとしようか。

CL のライブラリを眺める [Metatilities]

2008-11-22T19:02:00.005+09:00

今日行われる CL勉強会@Lingr の予習を少し。 11/22 第24回慢性的CL勉強会@Lingr8時だョ!全員集合告知 CL勉強部屋@Lingr 今回読むライブラリ: Metatilities 生 REPL くらいしか触ったことがないから CL のライブラリを見るのは今回が初めて。そんな CLer 初心者なのでパッと見た感じの感想だけ書いておきます。勉強会はおとなしく ROM かな。 Metatilities はユーティリティライブラリ CL のライブラリを読み込ませる方法が分からないインストールは ASDF Linux のパッケージシステム(RPM とか YaST とか)、xyzzy の NetInstaller みたいなもの？かろうじて分かったもの anaphoric.lisp (OnLisp からアナフォリックマクロ)

アロンアルファ棒

2008-11-20T01:21:00.005+09:00

半年前に買ったのを使おうとした結果がこれだよ。

[xyzzy] newLISP 環境を構築してみたい

2008-11-18T00:51:00.016+09:00

※一応 Emacs 版もあります。 newLISP に付属のエディタが使いにくい。やっぱり使い慣れたエディタがいいよね、ということで xyzzy から newLISP シェル (REPL) を操作する簡単な xyzzylisp を書いてみた。 (defvar *newlisp-exe* (merge-pathnames "newlisp.exe" (si:getenv "NEWLISPDIR"))) (defun run-newlisp () (interactive) (let ((*eshell* (format nil "~A -C -w ~A" *newlisp-exe* (default-directory))) (*shell-mode-hook* (list #'(

トラックバックはじめました

2008-11-18T00:24:00.010+09:00

HaloScan のサービスを使わせてもらうことに。 HaloScan.com - Weblog Commenting, Ratings and Trackback 参考にした記事 GoogleBlog(Blogger)におけるTrackBackの方法気をつけるべき点は、 Sineup した後で Members->Settings --- Time Zone を "(GMT + 9:00) Osaka, Sapporo, Seoul, Tokyo" Character Encoding を "UTF-8" の設定を忘れないことくらいか。まだ使ってないから知らないけど。さっそく参考にさせてもらった記事の方にトラックバックpingを送りつけようと思ったらトラックバックURLが見つからない罠。 2008-11-18T22:27:12+09:00 [追記] ブログの

ないないない

2008-11-18T00:04:00.011+09:00

newLISP なる LISP 処理系に手を出してみた。付属のデモを眺めてみた感じ、LISP というよりもスクリプト言語という印象。しかし困った点がいくつか... Common Lisp との挙動の違い以前の記事で書いた通り。これは慣れるしかない、か。日本語のドキュメントが少ない検索で見つかる日本語の記事が少ないのです。ただでさえ少ない(と思われる)LISP人口で、newLISP を使う日本人がどれだけいるのか。自分が newLISP を知るきっかけになった方の記事はまだ続いてるみたい。参考にさせてもらってます。サンプルコードが少ない日本語ドキュメント以上にこれは正直キツイ。インストールディレクトリにもサンプルはいくつかあるのだが、どうしてだろう、コードがすごく見づらい。全部タブインデントとか、束縛していない変数に代入とか。開発者の中に Emacs

なにこれ・・・

2008-11-14T08:30:00.001+09:00

ニコニコ動画にアップロードされている動画を音声ファイル(mp3)に変換するWebサービス「nicomimi」が、えらく混雑している。キャプチャは昨日の 22:30 くらいの。同じサービスを運営しているこっちが現在メンテナンス中(08/11/13 2:00 ～ 08/11/14 17:00)ということもあるのだろうが、ユーザも少しは自重しろと言いたい。

newLISP と CL/Scheme の比較

2008-11-11T07:49:00.015+09:00

意訳、省略を含むので参考程度に眺めることを推奨します。ところで newLISP ってなに？ Comparison to Common Lisp and Scheme このページでは newLISP と他の標準な Common Lisp, Scheme とのいくつかの違いを明らかにする。newLISP 特有のアプローチを知りたいなら About を読んで下さい。 CL と異なり、newLISP と Scheme は式のオペレータ部分を(引数に適用する前に)評価する。ラムダ式は自身を評価する。それらはリストの副タイプであり、他のリスト同様に扱えるファーストクラス・データオブジェクトである。 newLISP ではラムダ式の自由変数の束縛はラムダ式の適用時にのみ行われる。 newLISP のラムダ式は関数定義の後いつでも処理できる。 (last (lambda (x) (

CLISP on Cygwin が使えない

2008-11-03T16:42:00.010+09:00

半年くらい前からだろうか、cygwin にインストールした clisp が起動と同時にエラーになる症状に陥った。 $ clisp i i i i i i i ooooo o ooooooo ooooo ooooo I I I I I I I 8 8 8 8 8 o 8 8 *** - Internal error: statement in file "/usr/src/clisp/clisp-2.46-1/src/clisp-2.46/src/stream.d" , line 5658 has been reached!! Please see

[xyzzy] EDICT とべんりすぷ

2008-11-02T08:40:00.004+09:00

なんとなく xyzzy の辞書ファイルを更新しようとしたらちょっと驚いた。なんでかというと、その辞書ファイルの元となる EDICT ファイルが現在も更新されていたから。 xyzzy で辞書を使う方法は XyzzyWiki か $XYZZY/etc/README.gendic を参照のこと。 2008-11-02 現在、 Wiki の edict へのリンクは切れてます。編集したいけどページが凍結されている… 辞書ファイル配布元: The Monash Nihongo ftp Archive http://ftp.monash.edu.au/pub/nihongo/00INDEX.html トップページから "edict.gz" を検索すれば見つかるはず。大分上の辺り。で、少し古くても構わないのならば同じ辞書ファイルは sdic (Emacs 用辞書引きメジャーモード) の作者

整数を３けた区切り形式の文字列に変換する関数

2008-10-24T02:34:00.005+09:00

この間の日曜日、基本情報処理技術者試験を受けに行ってきました。合格するかどうかは正直微妙… そこでこんな設問が午後の問題問6: [プログラムの説明] 金額を表すときのように、整数を３けた区切り形式の文字列に変換する関数 convert である。(以下略) 表変換例 ┌────┬────────────┐ │ 整数 │３けた区切り形式の文字列│ ├────┼────────────┤ │1234567 │1,234,567 │ │ -57482 │-57,482 │ │ 63 │63 │ │-999999 │-999,999 │ └────┴────────────┘ Ｃ言語での問題だったけど、なんとなく

elispでarglist関数っぽいの

2008-10-23T20:32:00.007+09:00

「xyzzyでarglist関数っぽいの」[その1][その2] のおまけ。何でこんなの作ったんだろう… ;;; for Emacs Lisp (defun arglist (def) (unless (keymapp def) (let ((argstr (car (help-split-fundoc (documentation def) def)))) (if argstr (format "%s" (cdr (car (read-from-string argstr)))) (help-function-arglist def))))) (arglist 'arglist) ; (def) (arglist 'lambda) ; "(ARGS [DOCSTRING] [

とりあえず「特殊」だということは分かった

2008-10-23T08:30:00.015+09:00

「CLのスペシャルに秘められた罠(?)」より関係あるっぽい記述を見つけたのでメモ。 SPECIAL-OPERATOR-P - CLHS Notes: Historically, this function was called special-form-p. The name was finally declared a misnomer and changed, since it returned true for special operators, not special forms. 注意: (適当訳) 古くから、この関数は special-form-p と呼ばれていた。この関数はスペシャル・フォーム(リスト)でなく、スペシャル・オペレータ(シンボル)が与えられる場合に真を返すことから、この名前は最終的に誤った名前であると認められ改定された。仕様を決

読書感想文

2008-10-21T19:15:00.004+09:00

Shibuya.lisp テクニカルトーク #1 (Ustream.TV)での配信をリアルタイムで見てました。 # 途中あまりの眠気に落ちたのはナイショ Lispを使った実例を見れた(聞けた)ところ、これが良かった。 Lispで作られたアプリの例をあまり知らないので。一番印象に残ったのはmitamex4uさんの「俺Lisp」の話。ケータイで動くREPLを見てみたいです。もう少し文章書いていた気がするんだけど、気に入らない部分を添削してたらこんなに短くなってしまったよ。

なんでだろう

2008-10-19T22:39:00.007+09:00

「APIを叩く」って言葉は誰が言い出したんだろう。「叩け(リクエストすれ)ば埃(レスポンス)が出る」みたいな意味合いだと思うが。うまい表現だなあと思った。それだけ。 2008-11-01T03:46:40+09:00 [追記] コンピュータ用語として「叩く」を取り上げていたページ叩く - 通信用語の基礎知識プログラミングに於いては、ハードウェアの接続されているI/Oポートにアクセスすることを "ポートを叩く" と表現する。日本版 Jargon File vt. プログラマが「叩く」ものはポートである。英語ではもっぱら `bashing' が使われるが、それと対応している。まあ、スラングなんでしょう。

[xyzzy]外部コマンドの結果を文字列として出力する

2008-10-15T08:06:00.009+09:00

command-substitutionという関数があります。けっこう便利。上の関数を、バッファを介せずにCLの標準関数だけで作れないかなーと思ってこんなものを書いてみた。まだまだ処理系依存。やっていることは以下の3点外部コマンドを呼び出して、結果をファイルに保存保存したファイルの中身を文字列ストリームに流すついでに右端の空白文字を取り除く (defun cat (file &optional stream) "print file contents." (with-open-file (fp file) (do ((ch (read-char fp nil nil) (read-char fp nil nil))) ((null ch)) (princ ch stream))))

第20回CL勉強会@Lingrセルフ反省会

2008-10-14T20:22:00.005+09:00

勉強会ログ g000001さんによる勉強会まとめ前半: Let Over Lambda 概略 2～3章まで (g000001さん) 筆者が別だから当然だけど、OnLispとは違った側面でマクロを使っている印象。マクロの導入部分はどうしても他のマクロ本と似たり寄ったりの説明になってしまうのかも。ちょっと勘違い。 xyzzyはインタプリタとしてしか使ってないから、コンパイルする際のマクロ展開やら変数補足やらを気にしたことなんてなかったなあ。後半: CL永続化入門 (onjoさん) GoogleDocsによるスライドはとても見やすかったです。 xyzzyが吐き出すダンプファイルもLispのデータを保存している例ではなかろうかと思ったり思わなかったり。 (si:dump-image-path) ; => "C:/home/xyzzy/xyzzy.wxp" 次回の

チャットにおける「>」「<」の使い方

2008-10-12T13:56:00.007+09:00

チャット上での用語・表現 - Wikipedia 「>」「<」特定の相手にコメントする場合に用いる簡易接続詞。「>」は左にコメントを、右に固有名詞を入れて二人称的に扱う。例えば「こんばんは>スズキ」なら「スズキさん、こんばんは」という程度の意味だが、「落ちます>ALL」なら、参加者全員にお別れを云っている事になる。「<」は三人称的に用いるが「大変ですね<イトウ」なら、「イトウさんは大変なんですね」といった感じで問い掛けているような意味に使われる。これらの場合、固有名詞は大抵、敬称を略して使われる。 Lingrのログを参考にして適当に使っていたけれど、それなりの意味があったとは知らなんだ。「>」ばかり使っていた気がする。 Wikipediaだと「<」の説明がよく分からなかったので他にも検索してみた。多分こんな感じ Ω 自分の発言 < 話題 > 相手(HN

.emacs >>> .xyzzy (いろんな意味で)

2008-10-10T08:48:00.008+09:00

たまにVineLinuxを使っています。これに付属のEmacsの標準背景色(紫)がキーワードの色と軽くかぶっていて見づらいのです。仕方ないから配色変えようかとelispを弄りだしたのが失敗だった。「そういえばこっちの設定ファイル、Windowsのより古かったな」「namestringって使えなかったっけ？」「関数調べるの面倒くさいな(info-modokiとHyperSpecに慣れていたので)」とかなんとか愚痴りながら作業してたら、いつの間にか日付が変わっていた。ナンテコッタイとりあえず elispにもCommonLispのような仕様書があれば良いのに、と思った。関数定義に一発でジャンプできるのがいいなあ。関数のdoc-stringとか、 elisp-infoもあるけど、慣れていないと使いづらい。あと、パッケージの概念がないから標準関数と拡張関数

舌足らずなブログ

Win64でnewLISPをコンパイルする

newLISP v.10.3.2リリースノート翻訳

[newLISP]cygwinでのコンパイルを通す

端末の表示崩れをなんとかする

ユニークなURL

めんまフォント

いろいろ

今日の無題

newLISPのコード片を貼り付けるサイト

It works!

今日の無題

今年読んだ本

[Emacs]Unicodeエスケープ文字を復元する

今日の無題

[Emacs]sha1-file

[newLISP]今日の無題

テスト投稿

newLISP基礎文法最速マスター

[xyzzy]zone.l移植

Scheme コードバトンに参加

今日の無題

[xyzzy]分かったけど解決はしていない

[VLC][クリスマス]あと数日ですよ

今日の無題

[Emacs]eldocをほんの少し便利にする

[Emacs]そんなことよりeval-after-load使おうぜ

Swank server for newLISP

今朝の無題

TeXのバージョンが円周率に近づいているらしい

[VT100]アスキーアニメーション[AA]

今日の無題

あれ？

[xyzzy]regexp-optを移植

「１０分でコーディング x 2 〜リストの破壊的操作篇〜」を解いてみる

「なぜJAVAなのか」と聞かれたら

DICT:2628

今日の無題

GitHubアカウントをとりました

今日の無題

参考にならないmanコマンドの文字化けについてのメモ

ubuntu インストール

[Gmail]既読ボタンを有効にする

[Emacs] シンボルから info を呼び出す

[LISP]マクロのエイリアス

今日のバカ

[Elisp] font-lock の勉強中

今日の無題

今日の無題

本家にばれてた

Slimy hackathon #1 に参加してきた

ブログのまとめエントリ

今日の無題

読書感想文#2

newLISPの特徴、軽くまとめ

[xyzzy]check-parens

[Emacs]tabba.elのせいだったのか

今日の無題

xyzzyのべんりすぷ(汎用編)

今日の無題

progvの途中

今日の無題

[xyzzy]autoloadされたモジュールの一覧

[xyzzy]HexlのPatch

[CL] 0から1000までに含まれる0をカウントする

今日の無題

[PCL]第29回CL勉強会セルフ反省会[CADR]

丑年

今日の無題

'fooと#'fooの違いは環境の違い

あと一週間

おおえまくすよ マクロをつかわないとは なさけない

[Emacs] newLISP 環境を構築してみたい

(require 'cl) は悪なのか？

elisp にもラベル記法があったのか

newLISP v.10.0 インストールメモ

あったら便利だと思う

メモ化のメモ

xyzzy を再起動させる

ネット断食

おおえまくすよマクロをつかわないとはなさけない