Hatena::Groupcadr

わだばLisperになる このページをアンテナに追加 RSSフィード

2004 | 12 |
2005 | 01 | 02 | 07 | 10 | 11 |
2006 | 06 | 07 | 08 | 09 | 10 | 11 | 12 |
2007 | 01 | 02 | 03 | 04 | 05 | 06 | 07 | 08 | 09 | 10 | 11 | 12 |
2008 | 01 | 02 | 03 | 04 | 05 | 06 | 07 | 08 | 09 | 10 | 11 | 12 |
2009 | 01 | 02 | 03 | 04 | 05 | 06 | 07 | 08 | 09 | 10 | 11 | 12 |
2010 | 01 | 02 | 03 | 04 | 05 | 06 | 07 | 08 | 09 | 10 | 11 | 12 |
2011 | 01 | 02 | 03 | 04 | 05 | 06 | 07 | 11 |

2006-09-24

勉強するよ.12

| 12:53 | 勉強するよ.12 - わだばLisperになる を含むブックマーク はてなブックマーク - 勉強するよ.12 - わだばLisperになる

Schemeの勉強.12

今日は、第12章の途中

オブジェクトとクラスの章だけども、いきなり難しいと

いうか、プログラム言語初学者対象って感じじゃなくなっ

てしまってる香り。

Gaucheを使って学習する場合、CLOSっぽいGaucheのオジェ

クトシステムがあるので、それと比較しながら学習する

のが良いのだろうが、自分は、MzScheme、Gauche、オジェ

クト指向、それぞれが良く分かっていないので、何をす

べきかが全然見えてこない。が、しかし、適当に進むこ

とにはしてみよう。

とりあえず、例示コードのの適当な書き直し。

(define-class standard-class ()
  ((slots :init-keyword :equ)
   (superclass :init-keyword :superclass)
   (method-names :init-keyword :method-names)
   (method-vector :init-keyword :method-vector)))

(define trivial-bike-class
  (make standard-class
    :superclass #t
    :slots '(frame parts size)
    :method-names '()
    :method-vector #()))

12章の巻は、まだ続く。

ゲスト



トラックバック - http://cadr.g.hatena.ne.jp/g000001/20060924