1# Copyright (C) 2009 - 2016 Dirk Eddelbuettel and Romain Francois 2# 3# This file is part of Rcpp. 4# 5# Rcpp is free software: you can redistribute it and/or modify it 6# under the terms of the GNU General Public License as published by 7# the Free Software Foundation, either version 2 of the License, or 8# (at your option) any later version. 9# 10# Rcpp is distributed in the hope that it will be useful, but 11# WITHOUT ANY WARRANTY; without even the implied warranty of 12# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 13# GNU General Public License for more details. 14# 15# You should have received a copy of the GNU General Public License 16# along with Rcpp. If not, see <http://www.gnu.org/licenses/>. 17 18.dummyInstancePointer <- new.env() # just something permanent 19 20.classes_map <- new.env() 21 22.onLoad <- function(libname, pkgname){ 23 new_dummyObject(.dummyInstancePointer) # nocov 24} 25 26 27