Singleton: Difference between revisions
→{{header|Erlang}}
Line 602:
# ...
}</lang>
=={{header|Eiffel}}==
===Non-Thread Safe===
Taken from [http://www.jot.fm/issues/issue_2004_04/article5/ this dated site]
'''Implementation:'''
<lang Eiffel>class
SINGLETON
create {SINGLETON_ACCESS}
default_create
feature
-- singleton features go here
end</lang>
<lang Eiffel>frozen class
SINGLETON_ACCESS
feature
singleton: SINGLETON
once ("PROCESS")
create Result
ensure
Result /= Void
end
end</lang>
'''Usage:'''
<lang Eiffel>s: SINGLETON -- declaration somewhere
s := (create{SINGLETON_ACCESS}).singleton -- in some routine</lang>
=={{header|Erlang}}==
| |||