Class ::xo::InstanceManager
::xo::InstanceManager
create ...
Class Relations
- class: ::xotcl::Class
![[i]](/resources/acs-subsite/ZoomIn16.gif)
- superclass: ::xotcl::Object
![[i]](/resources/acs-subsite/ZoomIn16.gif)
::xotcl::Class create ::xo::InstanceManager \
-superclass ::xotcl::Object
Methods (to be applied on instances)
alloc (scripted)
set r [next]
set key blueprint($r)
if {![ns_conn isconnected]} {
[self class] set $key 1
} elseif {![[self class] exists $key]} {
[self class] set connectionobject($r) 1
}
return $rdestroy (scripted)
next
ns_log notice "--unset -nocomplain [self class]::blueprint([self])"
[self class] unset -nocomplain blueprint([self])
[self class] unset -nocomplain connectionobject([self])