CLISP
GNUプロジェクトによるANSI Common Lispのフリーな実装。
Linux、FreeBSD、NetBSD、OpenBSD、Solaris、Tru64、HP-UX、BeOS、NeXTstep、IRIX、AIX、Windows NT/2000/XP、Windows 95/98/MEで動作する。
このタグの解説について
この解説文は、すでに終了したサービス「はてなキーワード」内で有志のユーザーが作成・編集した内容に基づいています。その正確性や網羅性をはてなが保証するものではありません。問題のある記述を発見した場合には、お問い合わせフォームよりご連絡ください。関連ブログ
Common Lispのソースで日本語を使う
あまり考えたことが無かったのですけど、 Unicodeに対応している処理系だと、 symbolに日本語が使えます。 次のコードを例に挙げます。 (defun 何回か乗算する (回数 値) (let ((答え 1)) (dotimes (無視 回数 答え) (setq 答え (* 答え 値))))) (何回か乗算する 16 2) -> 65536 これすごいな。 sbcl, clisp, cclでは何事も無く動作します。 nptでは最初は無理でしたが、修正してなんとか動くようにしました。 Unicodeには対応しているので少しの修正で何とかなりました。 方法は、read実行中に#x80以上の文字…
ネットで話題
もっと見る
clisp.cons.org
lispuser.net
clisp.sourceforge.io
www.shido.info
qnzm.hatenadiary.org
github.com
sh1.2-d.jp
blacksmithmirai.hatenadiary.org
sh1.2-d.jp関連ブログ
restartを始めよう
restartとは何か？ ずっとよく分かっていませんでした。 でもCommon Lispを作って行けばおのずと理解できると思って、 一通り作っても依然としてrestartが理解できませんでした。 invoke-restartもrestart-bindもC言語で作ったのに いまだに理解できないとはどういう事なんだ、驚きです。 という事で勉強し直しです。 勘違いかもしれませんが、restartってとても難しいのでは？ 技術が難しいのではなく、何のために存在しているのかという 基本的な考え方があまり表に出てきてないように思えます。 とくにconditionとの違いが分からなかった。 何で似たような機…
lambda式で関数生成しない場合を考える
最近知ったのですが、lambda式はクロージャーが値を捕捉していない場合は 実行するたびにいちいち関数生成なんてしないで、 グローバルの関数を返却すればいいんだそうです。 どういうことかというと、例えば次の関数を考えてみます。 (defun aaa () (lambda () :hello)) 関数aaaはlambda式により関数を返却しますが、 内側の関数は:helloを返すだけでクロージャーによる値の捕捉はありません。 こう言う場合は、同じ関数オブジェクトを返却しても良いという事です。 sbclで次のコードを実行してみます。 (format t "~S~%" (aaa)) (format …
(setf getf)の定義が難しかった
getfはplistの値を操作するアクセス関数です。 取得する方の構文は、 (getf plist indicator &optional default) みたいな感じです。 設定の方はこんな感じ。 (setf (getf place indicator &optional default) new-value) 説明では、setfでgetfを使うときにdefaultが無視されると記載されています。 ああそうなんだ、defaultは無視でいいんだなと思って、 ただ式を評価するだけで値を捨てていたのですが、 規約をちゃんと見直すと、setfマクロのときだけdefaultの意味がないのであって、…
Lispの動かし方は・・・
すっかり忘れていたので自分用にメモするｗ1.Cygwin で clisp をインストールしておく。最新のテスト版を入れないとうまく動かない。たぶん。 2.Emacs は各自用意する。 3.SLIMEを入れる。 M-x package-list-packagesで slime を検索して入れる。 4.SLIME起動 M-x slime 5.LISPのソースコードを開いて、C-c C-l するとロードする。Enjoy hack!
npt amalgamation
nptのドキュメントです。 参照元：ANSI Common Lisp npt トップページ - nptclのブログ 前へ：nptコマンドの引数 - nptclのブログ 次へ：npt特有の機能 - nptclのブログ npt amalgamation npt amalgamationとは、nptのソースを数個にまとめたものです。 現在、nptのソースファイルは600個を超えていますが、 npt amalgamationをはそれらのソースを下記の3つにまとめてしまいます。 lisp.c lisp.h shell.c 単純に結合しただけなので、 通常のnptとamalgamationでは機能の差はあ…
nptをC言語で使用する
nptのドキュメントです。 参照元：ANSI Common Lisp npt トップページ - nptclのブログ 次へ：hold変数の使い方 - nptclのブログ はじめに nptはC言語に組み込むことを目的として開発しています。 本章の目的は、nptをモジュールという位置づけにして どのように開発していくのかを示し、 簡単なサンプルを作成して実行することです。 ★注意：nptのモジュール用関数はまだ開発中なので変更される可能性があります。 amalgamationを作成する 開発で必ず必要になるのがamalgamationのソースです （npt amalgamationの詳細はこちら n…
Watch.昭和最大の顔役 Movie Online Putlocker
Watch.昭和最大の顔役 Full Movie Online Putlocker Title: 昭和最大の顔役 Release: 1966-05-30 Language: Japanese Genre: Drama, Crime Duration: 90 Min Casts: Koji Tsuruta, Tetsurō Tamba, Tatsuo Umemiya, I. George, Naoko Kubo, Reiko Ôhara, Michitarô Mizushima, Fumitake Ômura, Akikane Sawa, Nakajirô Tomita, Hiroshi Naw…
今までどのくらいプログラミング言語を触ってきたか(3秒で挫折したものものも含む) Ver.12
2020-06-30現在のステータス。 https://eel3.hatenablog.com/entry/2019/06/30/000000 から1年経て、こうなっている。なおCSS、HTML、XMLはひとまず除外する。人工言語ではあるけれども「プログラミング言語」という括りに含められるか否かは議論が分かれる気がする。*1 よく使っている AWK (Gawk) 単純なテキストレコードの処理はAWKで十分間に合う。今の時代、自作ツールをnawkやGNU awk単体で実装するのは苦行すぎて*2皆無なものの、シェルスクリプトやMakefileにAWKのコードを埋め込むなどして他のコマンドと組み合わ…
ついにeval-whenにたどり着く
compile-file関数を実装して行ったら、 最後の最後にeval-whenにたどり着きました。 eval-whenは難しいですね。 この機能を調べても全然意味が分かりません。 何に使うものなのかを簡潔に書くことすら難しいです。 たぶん「compile-fileで、コンパイルだけではなく同時に実行もしたいときに使うもの」です。 知らなかったのですがcompile-file関数はコンパイルだけじゃなく、 場合によっては実行もするんだそうです。 じゃあ何をいつ実行するんだというのを制御するのがeval-whenです。 典型的な例文を示します。 下記のファイルをコンパイルしてみましょう。 ;; …
ここまでの過程
思えばEmacsを使い始めた時から自分はlispというものに出会っていた。２００４年頃の事だ。当初、自分はviを使っていた。viも癖が酷いエディタで、入力しようとしてもまず、文字の入力すらままならないといういきなり初心者に強烈な先制パンチを食らわすエディタだった。しかし、通勤電車の中で一生懸命viのキーバインドを覚えた。そのままでも良かったのかもしれないが、何故かEmacsというエディタに今度は出会った。初めての浮気とも言うべきか。Emacsはviと違い、最初からテキストを入力出来る。しかし、キーバインドがviの洗練された操作から見ると異常なエディタで、そしてカスタマイズしなければただの箱みた…
make-load-formとは一体なんなんだ
make-load-formなんて誰も使ってないと思いますが説明します。 いまさらですけど、Common Lispって1994年に制定されているんですよね。 25年近く前の言語でマイナーな関数の説明なんて全く需要ないっすね。 それではmake-load-formを使ってみましょう。 これはCLOSオブジェクトをコンパイルするときに使うものです。 さっそくやってみます。 まずはクラスを作成します。 (defclass hello () ((value :initarg :value))) make-load-formは、このクラスを保存するのではなく、 インスタンスを保存するときに使います。 注…
lexical変数のことが分かったような気がする
lexical変数の設計を色々やってみて、最終的に落ち着いたものについて話します。 たぶんこれが正解に近いのかと。 少しでも速度改善したいと、clispのdisassembleでも見てみようかと思ったときのことです。 速度測定によく使っていたmk.eastasian.lispのextract-loop関数を出力してみました。 > (disassemble 'extract-loop) Disassembly of function EXTRACT-LOOP 2 required arguments 0 optional arguments No rest parameter No keywor…
少し早くなったので諦める
以前の結果はこれで、 $ time npt --script mk.eastasian.lisp real 0m57.098s user 0m56.853s sys 0m0.233s 今回の結果はこれ。 $ time npt --script mk.eastasian.lisp real 0m23.119s user 0m22.831s sys 0m0.283s 半分以上早くなっていますね。 わりといい結果だと思います。 ちなみにclispは $ time clisp -m 2g mk.eastasian.lisp real 0m2.294s user 0m2.276s sys 0m0.016…
