Prob::Prob (SCM type, SCM immutable_init)
{
- self_scm_ = SCM_EOL;
mutable_property_alist_ = SCM_EOL;
immutable_property_alist_ = immutable_init;
type_ = type;
{
immutable_property_alist_ = src.immutable_property_alist_;
mutable_property_alist_ = SCM_EOL;
- self_scm_ = SCM_EOL;
type_ = src.type_;
/* First we smobify_self, then we copy over the stuff. If we don't,