Design Pattern: Application Variables |
{application} class >> _Pragma_{application}Globals "%%PRAGMA DECLARE (name: AppVariable1 isPool: false isConstant: false valueExpression: 'nil') (name: AppVariable2 isPool: false isConstant: false valueExpression: 'nil') "
{application} class >> loaded AppVariable1 := AppVariable1Class new. AppVariable2 := AppVariable1Class new.
{application} class >> removing AppVariable1 shuttingDown. AppVariable1 := nil.