REnvironmentObject *RObjectList::createTopLevelEnvironment (const QString &name) { RK_TRACE (OBJECTS); REnvironmentObject *envobj = new REnvironmentObject (this, name); envobj->updateFromR (update_chain); return envobj; }
void RObjectList::createToplevelEnvironment (const QString &name) { RK_TRACE (OBJECTS); RK_ASSERT (childmap.find (name) == childmap.end ()); REnvironmentObject *envobj = new REnvironmentObject (this, name); if (name == ".GlobalEnv") { envobj->type |= GlobalEnv; } else if (name.contains (':')) { envobj->namespace_name = name.section (':', 1); } else if (name == "Autoloads") { envobj->type |= GlobalEnv; // this is wrong! but it's a temporary HACK to get things to work } addChild (envobj, name); RKGlobals::tracker ()->addObject (envobj, 0); envobj->updateFromR (); }