git clone した Lem を実行する - Qiita
$ git clone https://github.com/cxxxr/lem.git $ cd lem $ ros run -e '(setf ql:*local-project-directories* (list #p"."))(ql:quickload :lem-ncurses)(lem:lem)(quit)' 初回の実行時はコンパイルが行われるため、起動に少し時間がかかります。 コンパイルされたプログラムは ~/.cache/common-lisp にキャッシュされるため、次回の起動時からは比較的早く立ち上がります。 Lem のソースコードを編集して起動し直すと、自動で再コンパイルが実行されます。 Lem 自身のソースコードを弄りたい場合に、Roswell でインストールした Lem とは別に、git でクローンした開発用の Lem を保持することができるので便利です。 参考
EastAsianWidth.txt から全角文字の範囲を示すデータを生成する - Qiita
はじめに Unicode の全角・半角判定ルーチンで使用するため、EastAsianWidth.txt をパースして、全角文字の範囲を示すデータを作成します。 パーサーコンビネーターを使ってみたいので、正規表現は使用しません。 今回実装する内容 以下を実装していきます。 ファイルフォーマットを PEG で定義 定義した PEG をもとにパーサーを作成 作成したパーサで EastAsianWidth.txt をパース パースした結果を加工してデータを作成 PEG 定義 EastAsianWidth.txt のフォーマットを PEG で表すと以下のようになります。 # [ファイル] は [行] の 0 回以上の繰り返しの後に [EOF] FILE <- LINE* EOF # [行] は [文字コードの範囲][セミコロン][文字種][パディング][コメント][改行] または [コメント][改行
Lem エディタから OS コマンドを実行する - Qiita
はじめに Lem エディタのバッファ上から OS のコマンドを実行し、結果をバッファに書き戻す処理を実装します。 実行例 今回実装するプログラムの実行例は以下の通りです。 Lem エディタ内から Bourne Shell を起動し、ls -l を実行させ、結果をバッファに書き戻しています。 ;; load program (load "lemsh") ;; create sub process (lemsh:start "sh") ;; interact with it (lemsh:pwrite "ls -l") -rw-r--r-- 1 me staff 2197 10 21 15:35 lemsh.md -rw-r--r-- 1 me staff 2111 10 21 15:32 lemsh.lisp total 16 ;; quit (lemsh:stop) Bourne Shel
適当に継承例 - Qiita
# runtime "hsp3cl" # cmpopt varinit 1 # module Animal _name,virtualBark,isGrow #define super(%1) \ _name=%1 :\ virtualBark=*overrideBark #modcfunc name return _name #modcfunc bark gosub virtualBark return refstr # global # module Dog _name,virtualBark #modinit str __name super@Animal __name return *overrideBark return "ワオーン" # global # module Cat _name,virtualBark #modinit str __name super@Animal
Opusmodusの基本。 - Qiita
はじめに OpusmodusはCommon Lispベースの環境で簡単にMIDIやMusic XMLを生成することのできる統合開発環境です。 手前味噌ですが、Opusmodusを作ってこんな曲とかを作ったりしました。 公式サイトにも色々サンプルがあります。 mac専用で有料ですが、色々実験的なアルゴリズム作曲をしたい時は便利です。 すごく便利なんですが、基本的に日本人のユーザーは今は僕しかいないので、せっかく興味があるのに英語のドキュメントに阻まれてハンズオンできない人を救済するために、簡単なことだけまとめます。 基本のキ ⌘+eでカーソル以下を評価し、コンソールに出力します。⌘+Eでファイル全体を評価します。 OMNという単位で音価、音高、ダイナミクス、奏法を指定します。（以下、公式サイトよりキャプチャ） ダイナミクスと奏法は省略することもできます。 例えば以下のように作ったOMN上にカ
asdfの説明 - Qiita
asdfについて ごきげんよう。今日はasdfについて説明していこうと思う。それにquicklispを使ったライブラリの作り方も説明していく。これを読んで、自分もライブラリを作ろうと思ってくれたら幸いだ。 asdfとは、commonlispのライブラリをインストールするときに使うライブラリでrubyのgemに近いものがある。つまり、複数のソースコードを一括でロードをすることができる。分割したぶつ切りのコードを統合してくれると思ってくれたほうがいいかもしれない。ただし、Pythonやgemのような使い勝手の良さはさほどない。というよりも全く無いに等しい。つまり、初心者には使い勝手が悪すぎる。 だが、今だけは我慢してほしい。いずれは、もっと使いやすいものが生まれてくるから。というのも、おそらくだが、いずれかはPythonのimportのようにimportするだけで使えるライブラリが出てくるかも
CommonLispでXML読み込み（CXML、XPATH） - Qiita
; Closure XMLをロード (ql:quickload :cxml) (ql:quickload :cxml-stp) ; Plexippus XPathをロード (ql:quickload :xpath) (let (xml) ; XML読み込み (setf xml (cxml:parse-file "./test.xml" (stp:make-builder))) ; 文字列を取得 (format t "string : ~A~%" (xpath:string-value (xpath:evaluate "/document/string" xml))) ; 数値を取得 (format t "number : ~A~%" (xpath:number-value (xpath:evaluate "/document/number" xml))) ; 複数のノードを処理する (xp
cl-openglでグラフィックス（文字列描画編:GLisph） - Qiita
;; Variables for GLisph. (defparameter *font-en* nil) (defparameter *glyph-table-en* nil) (defparameter *text-en* #("text drawing sample")) ;; 初期化処理 (defmethod glut:display-window :before ((window main-window)) ;; Initialize GLisph. (gli:init *width* *height*) (setf *font-en* (gli:open-font-loader #p"./font/Ubuntu-R.ttf")) (setf *glyph-table-en* (gli:make-glyph-table *font-en*)) (loop for text acr
cl-openglでグラフィックス（画像描画編） - Qiita
CommonLisp+OpenGLで画像を表示したい 単純なプリミティブを描画できるようになると今度は画像を表示してみたくなる。 方法を探っているうちにRAW画像を読み込んで描画する方法がわかったのでサンプルをつくってみた。 開発環境 Windows 10 x64 Steel Bank Common Lisp 1.3.12 QuickLisp 使用技術 cl-opengl 先述の記事でも利用したCommon LispからOpenGLを利用するためのライブラリ。 これがないとなにもはじまりません。 成果物 参考にしたサイトにあるサンプルをみながらごにょごにょしたサンプルコードをGitHubで公開しています。 動かし方 cd ~/quicklisp/local-project git clone https://github.com/singy15/cl-opengl-image-sample
処理の途中経過を保持して外部に隔離する - Qiita
この記事はLisp Advent Calendar 2017の11日目の記事です。 はじめに 現行のDarkmatterについてはこちらをご覧ください． 開発版のDarkmatter Core/Notebookについては最低限の動作が出来たら追記します． 現在開発中のDarkmatter Core/Notebookには，コード実行の途中経過を手動で保存する機能があります． そのため実行を中断しても途中の結果が見れたり，実行時エラーで死んだりしても途中経過を残しておけば確認が可能です． さらにリアルタイムな可視化にも利用されるため，機械学習の実験などに有用です． 途中経過を保存する領域は単なるhash-tableなので，通常の変数と同様に扱うことが出来ます． トリッキーな実装なので誰得かは分かりませんが，記録として残しておきます． 実装概要 コードの実行はthreadを立ち上げて行う thr
Common Lispで実装したWebアプリを動かすdockerイメージを作っただけの話 - Qiita
Nextremer Advent Calendar 2017 14日目の記事です Lispという言語に皆さんは触れたことがあるでしょうか？ 「神の言語」とも言われるLisp、プログラマーであれば一度は気になったことがあるんじゃないでしょうか NextremerにはLisperのメンバーが若干名おり、そのお陰で最近はたまにNextremerのオフィスでLispの勉強会であるShibuya.lispが開催されたりしています 私自身は今まで一度もLisp系の言語をちゃんと勉強したことがなかったんですが、会社のslackでうっかりCommon Lispやってみたいてきなことを呟いたらLisperの方々が反応してくれました このやり取りをきっかけに、最近じわじわと社内でCommon Lisp熱が高まりつつあります Common Lisp を使おう！ Common Lisp環境のセットアップ、Hell
リリース、障害情報などのサービスのお知らせ
最新の人気エントリーの配信
j次のブックマーク
k前のブックマーク
lあとで読む
eコメント一覧を開く
oページを開く
Lem のビルド方法 - Qiita
Lem のキーバインド - Qiita
2018年のCommon Lispへの手引きはこれだ! - Qiita
Wordnet × CommonLispで類義語を抽出してみる - Qiita
CommonLispでCeramicとCaveman2を使ってGUIアプリを作る - Qiita
Opusmodusで便利な関数たち - Qiita
Common LispでSingletonなクラスを作る（CLOS） - Qiita
CommonLispのformat関数と*query-io* - Qiita
Common Lispで名前に丸括弧を含む関数を定義する - Qiita
