Smalltalk-72

入手先

• SqueakMap:Smalltalk-72

関連

• minnow:Smalltalk-72 [英語]
• 山宮さんのSqueak Smalltalk-72 エミュに関するメモ [日本語]
• Smalltalk-72 Manual [英語]

サンプルコード

to className tempVar : instVar : classVar (
	isnew?("tempVar _ 1. "instVar _ 2. "classVar _ 3)
	%tempVar?(%_?(:tempVar) !tempVar) 'not work...'
	%instVar?(%_?(:instVar) !instVar) 'set or return the inst var'
	%classVar?(%_?(:classVar) !classVar) 'set or return the class var'))

"inst1 _ className
"inst2 _ className
inst1 instVar '=> 2'
inst2 instVar '=> 2'
inst1 classVar '=> 3'
inst2 classVar '=> 3'
inst1 instVar _ 20
inst1 instVar '=> 20'
inst2 instVar '=> 2'
inst1 classVar _ 30
inst1 classVar '=> 30'
inst2 classVar '=> 30'

このページを編集 (989 bytes)

以下の 2 ページから参照されています。

• Smalltalk　最終更新: 2007-02-13, 17:54:17 <pharm88>
• Io　最終更新: 2016-03-18, 11:34:49 <phara2>

This page has been visited 3828 times.