Abstract Singleton Cache Factory, Coco flavor

gistfile1.coffee

universe = {}
purgatory = {}

summon = (type, context) -> (purgatory[type] ||= new universe[type]) <<< {context}

summonable = -> universe[it.display-name] = it

class Base
	-> console.log "A new <#{@..display-name}> was born!"

summonable class Foo extends Base
	-> super!
	shout: -> console.log "My context is #{@context}"

summonable class Bar extends Base
	-> super!
	shout: -> console.log "MY CONTEXT IS NOT #{@context.to-upper-case!}"

(summon \Foo, "derp").shout!
(summon \Foo, "durr").shout!
(summon \Bar, "hurg").shout!
(summon \Bar, "durg").shout!

A new <Foo> was born!
My context is derp
My context is durr
A new <Bar> was born!
MY CONTEXT IS NOT HURG
MY CONTEXT IS NOT DURG