* The parent environment of this environment */
| 355 | * The parent environment of this environment |
| 356 | */ |
| 357 | Environment_Impl parent() const { |
| 358 | #if R_VERSION < R_Version(4,5,0) |
| 359 | return Environment_Impl( ENCLOS(Storage::get__()) ) ; |
| 360 | #else |
| 361 | return Environment_Impl(R_ParentEnv(Storage::get__())); |
| 362 | #endif |
| 363 | } |
| 364 | |
| 365 | /** |
| 366 | * creates a new environment whose this is the parent |
nothing calls this directly
no test coverage detected