4 lines
100 B
Text
4 lines
100 B
Text
|
|
s: SINGLETON -- declaration somewhere
|
||
|
|
|
||
|
|
s := (create{SINGLETON_ACCESS}).singleton -- in some routine
|