タグ

Smalltalkに関するcho45のブックマーク (3)

  • ゆの in Smalltalk (その2) - みねこあ

    むちゃぶりとの指摘をうけてw、やっぱり投げっぱなしはいけないと思い直し、非力ながら ゆの in Smalltalk - みねこあ の再チャレンジしてみました。 Object subclass: #X instanceVariableNames: 'str' classVariableNames: '' poolDictionaries: '' category: 'Yuno' X class >> / value ^X new , 'スケッチ' X >> , value str := str, value X >> / value str := str, '365' X >> < msg str := str, ' ', msg X >> initialize str := 'ひだまり' X >> printString ^str ここまでは昨日どおり。問題は '_' が Smalltal

    ゆの in Smalltalk (その2) - みねこあ
  • ゆの in Smalltalk - みねこあ

    http://www.kt.rim.or.jp/~kbk/zakkicho/08/zakkicho0807a.html#D20080708-5さんより サーモスタット。 ただし、手抜き版です。 Object subclass: #X instanceVariableNames: 'str' classVariableNames: '' poolDictionaries: '' category: 'Yuno' X class >> / value ^X new , 'スケッチ' X >> , value str := str, value X >> / value str := str, '365' X >> < msg str := str, ' ', msg X >> initialize str := 'ひだまり' X >> printString ^str して、後はワークスペース

    ゆの in Smalltalk - みねこあ
  • ゆの in Squeak Smalltalk - Smalltalkのtは小文字です

    ゆの in Smalltalk - みねこあ での召還をまんまとうけてw、各種言語向けのを参考に要件を手探りしつつ、みねこあさんよりご要望のあったスキャナ(字句解析器)に手を加えてしまう Smalltalk ならでは…の方向で。 なにしろ元ネタ「ひだまりスケッチ」をまったく知らないので、ハズしていたらごめんなさい。 まず、グローバル変数 X を定義。 Smalltalk at: #X put: 'ひだまりスケッチx365 ' 続いて、スキャナのテーブルをいじって $/ を無効化。加えて #< の再定義と、X を監視するスレッドをバックグラウンドで走らせます。 | 番組名 | 番組名 := X. (Scanner classPool at: #TypeTable) at: $/ asciiValue put: #xDelimiter. X class compile: '< 告知 ^self

    ゆの in Squeak Smalltalk - Smalltalkのtは小文字です
  • 1