ブックマーク / blog.practical-scheme.net (12)

  • Island Life - 無限cxr

    無限cxr 「carとcdrの合成 (car, caddr, cadddr,...)って4段階までしか無いのか」ってツイートを見かけたので、無限に合成されるのを作ってみた。 あらかじめ定義しておかなくても、ソースコードを読んだ時点で展開されるので、 いくらでも長いc[ad]+rを使える。 https://gist.github.com/dd6cf4242a5ae59b85732b405b6d961b これを使えば『Land of Lisp』のビリーとボブの会話も実行できるぞ! (setf *readtable* *cxr-readtable*) ;;「ジブラルドルのエメラルド」が今週末に超特急列車で運搬される (defparameter *train* '((controls) (empty security-camera) (gem) (empty guard1 empty empty

    Island Life - 無限cxr
    natsutan
    natsutan 2021/10/08
  • Gauche Devlog - Static linking and standalone executables

    About On development of Gauche, and other topics related to Lisp/Scheme in general. More details. Author Shiro Kawai, shiro at acm dot org. Recent Entries PipeworksReal numerical functionsPretty print indentationSegmented completionHints for unbound variable error:immutable slot optionSource info propagation with macro expansionUsing Gauche in GitHub ActionsRunning gosh without installingIs this a

    Gauche Devlog - Static linking and standalone executables
    natsutan
    natsutan 2018/08/14
  • Island Life - 誤差が生じるとき

    About 南の島のプログラマ。 たまに役者。 Practical Schemeの主。 WiLiKi:Shiro 最近のエントリ 無限cxr高校受験Defense振り返ってみると2019年は色々学んで楽...覚えるより忘れる方が難しい(こともある)眼鏡のつると3DプリンタIris Klein Acting ClassSAG-AFTRA conservatory: Voice Acting創作活動って自分を晒け出さねばならないと...ループを使わずに1から100までMore... 最近のコメント shiro on 歳を取ると時間が速く過ぎるのは、新しいことに挑戦しないから? (2023/03/14)1357 on 歳を取ると時間が速く過ぎるのは、新しいことに挑戦しないから? (2023/03/01)ベアトリーチェ on ハイポハイポハイポのシューリンガン (2022/04/02)ベアトリーチ

    Island Life - 誤差が生じるとき
    natsutan
    natsutan 2016/05/14
    僕は固定小数点数派!
  • Island Life - 勝手にお題---テキストフィルタ

    About 南の島のプログラマ。 たまに役者。 Practical Schemeの主。 WiLiKi:Shiro 最近のエントリ 無限cxr高校受験Defense振り返ってみると2019年は色々学んで楽...覚えるより忘れる方が難しい(こともある)眼鏡のつると3DプリンタIris Klein Acting ClassSAG-AFTRA conservatory: Voice Acting創作活動って自分を晒け出さねばならないと...ループを使わずに1から100までMore... 最近のコメント shiro on 歳を取ると時間が速く過ぎるのは、新しいことに挑戦しないから? (2023/03/14)1357 on 歳を取ると時間が速く過ぎるのは、新しいことに挑戦しないから? (2023/03/01)ベアトリーチェ on ハイポハイポハイポのシューリンガン (2022/04/02)ベアトリーチ

    Island Life - 勝手にお題---テキストフィルタ
    natsutan
    natsutan 2015/11/04
  • Gauche Devlog - It seems working. But...

    About On development of Gauche, and other topics related to Lisp/Scheme in general. More details. Author Shiro Kawai, shiro at acm dot org. Recent Entries Caching formatter procedurePipeworksReal numerical functionsPretty print indentationSegmented completionHints for unbound variable error:immutable slot optionSource info propagation with macro expansionUsing Gauche in GitHub ActionsRunning gosh

    Gauche Devlog - It seems working. But...
    natsutan
    natsutan 2013/07/07
  • Island Life - 在宅勤務と出勤

    About 南の島のプログラマ。 たまに役者。 Practical Schemeの主。 WiLiKi:Shiro 最近のエントリ 無限cxr高校受験Defense振り返ってみると2019年は色々学んで楽...覚えるより忘れる方が難しい(こともある)眼鏡のつると3DプリンタIris Klein Acting ClassSAG-AFTRA conservatory: Voice Acting創作活動って自分を晒け出さねばならないと...ループを使わずに1から100までMore... 最近のコメント shiro on 歳を取ると時間が速く過ぎるのは、新しいことに挑戦しないから? (2023/03/14)1357 on 歳を取ると時間が速く過ぎるのは、新しいことに挑戦しないから? (2023/03/01)ベアトリーチェ on ハイポハイポハイポのシューリンガン (2022/04/02)ベアトリーチ

    Island Life - 在宅勤務と出勤
    natsutan
    natsutan 2013/03/18
    開発の終盤でメンバーが上手く回っているとき、確かにリハーサル的な気分がある。おもしろい共通点。
  • Island Life - システムの非平衡状態

    About 南の島のプログラマ。 たまに役者。 Practical Schemeの主。 WiLiKi:Shiro 最近のエントリ 無限cxr高校受験Defense振り返ってみると2019年は色々学んで楽...覚えるより忘れる方が難しい(こともある)眼鏡のつると3DプリンタIris Klein Acting ClassSAG-AFTRA conservatory: Voice Acting創作活動って自分を晒け出さねばならないと...ループを使わずに1から100までMore... 最近のコメント shiro on 歳を取ると時間が速く過ぎるのは、新しいことに挑戦しないから? (2023/03/14)1357 on 歳を取ると時間が速く過ぎるのは、新しいことに挑戦しないから? (2023/03/01)ベアトリーチェ on ハイポハイポハイポのシューリンガン (2022/04/02)ベアトリーチ

    Island Life - システムの非平衡状態
    natsutan
    natsutan 2013/03/02
    プログラミング言語に軸足を置いた武勇伝は聞きたいな。僕だと迫る回路図出図の日に、Perlでネットリストチェッカー作ってひゃっはーみたいな。あれ、Cじゃだめだった。
  • Island Life - GaucheでもLand of Lisp

    『Land of Lisp』、皆さんのお手元に届き始めたようだけれど、 ぜひ読むだけじゃなく例を打ち込んでゲームで遊んでみて欲しい。 けれどもそのためにCLISPを入れるのも面倒だなあ、 という人のために、Land of Lispのゲームを Gaucheに移植しておいた。 WiLiKi:Gauche:LandOfLisp CLISPを入れちゃった人でも、「このCLのイディオムはGaucheではどう書けるんだろう」 と思った時のサンプルにしてもられば。 ★ ★ ★ (追記2013/02/25 09:15:08 UTC): 第10章で作る進化シミュレーションで、長く走らせてると 種の分化が起きるって話が出てくるけど、実際にgenesに違いが出てるのかどうかを ダンプして調べるのは少々煩わしい。そこで遺伝子の傾向の違いを色で表示する バージョンを作ってみた。リポジトリのevolution-col

    Island Life - GaucheでもLand of Lisp
    natsutan
    natsutan 2013/02/24
    まさかのご本人「けれどもそのためにCLISPを入れるのも面倒だなあ、 という人のために、Land of Lispのゲームを Gaucheに移植してお」いた。
  • Island Life

    無限cxr 「carとcdrの合成 (car, caddr, cadddr,...)って4段階までしか無いのか」ってツイートを見かけたので、無限に合成されるのを作ってみた。 あらかじめ定義しておかなくても、ソースコードを読んだ時点で展開されるので、 いくらでも長いc[ad]+rを使える。 これを使えば『Land of Lisp』のビリーとボブの会話も実行できるぞ! (setf *readtable* *cxr-readtable*) ;;「ジブラルドルのエメラルド」が今週末に超特急列車で運搬される (defparameter *train* '((controls) (empty security-camera) (gem) (empty guard1 empty empty guard2) (passenger-seat passenger-seat passenger-seat pas

    Island Life
    natsutan
    natsutan 2013/02/20
    グラフィクスパイプラインを使ってやりたい事が、みんな同じになったからでは?
  • Island Life - Land of Lisp

    About 南の島のプログラマ。 たまに役者。 Practical Schemeの主。 WiLiKi:Shiro 最近のエントリ 無限cxr高校受験Defense振り返ってみると2019年は色々学んで楽...覚えるより忘れる方が難しい(こともある)眼鏡のつると3DプリンタIris Klein Acting ClassSAG-AFTRA conservatory: Voice Acting創作活動って自分を晒け出さねばならないと...ループを使わずに1から100までMore... 最近のコメント shiro on 歳を取ると時間が速く過ぎるのは、新しいことに挑戦しないから? (2023/03/14)1357 on 歳を取ると時間が速く過ぎるのは、新しいことに挑戦しないから? (2023/03/01)ベアトリーチェ on ハイポハイポハイポのシューリンガン (2022/04/02)ベアトリーチ

    Island Life - Land of Lisp
    natsutan
    natsutan 2013/02/15
  • Island Life - ローカルスコープ内からグローバル定義

    natsutan
    natsutan 2012/12/12
    (defun bind-foo (x) (defun foo () x)) 一連の関数を定義するとき、これ出来る方が便利じゃん。
  • Island Life - グリーンカード更新

    About 南の島のプログラマ。 たまに役者。 Practical Schemeの主。 WiLiKi:Shiro 最近のエントリ 無限cxr高校受験Defense振り返ってみると2019年は色々学んで楽...覚えるより忘れる方が難しい(こともある)眼鏡のつると3DプリンタIris Klein Acting ClassSAG-AFTRA conservatory: Voice Acting創作活動って自分を晒け出さねばならないと...ループを使わずに1から100までMore... 最近のコメント shiro on 歳を取ると時間が速く過ぎるのは、新しいことに挑戦しないから? (2023/03/14)1357 on 歳を取ると時間が速く過ぎるのは、新しいことに挑戦しないから? (2023/03/01)ベアトリーチェ on ハイポハイポハイポのシューリンガン (2022/04/02)ベアトリーチ

    Island Life - グリーンカード更新
    natsutan
    natsutan 2012/02/21
    Shiroさんの神対応。
  • 1