SCGCreate-accessors
createAccessors self instVarNames do: [ :var | self compile: var, String cr, ' ^ ', var. self compile: var, ': aValue', String cr, ' ^', var, ' := aValue'. ]
Last changed by admin on 21 April 2009
createAccessors self instVarNames do: [ :var | self compile: var, String cr, ' ^ ', var. self compile: var, ': aValue', String cr, ' ^', var, ' := aValue'. ]