R/zzz.R

In cplexAPI: R Interface to C API of IBM ILOG CPLEX

#------------------------------------------------------------------------------#
#                     R Interface to C API of IBM ILOG CPLEX                   #
#------------------------------------------------------------------------------#

#  zzz.R
#  R Interface to C API of IBM ILOG CPLEX Version 12.1 to 12.10.
#
#  Copyright (C) 2011-2014 Gabriel Gelius-Dietrich, Dpt. for Bioinformatics,
#  Institute for Informatics, Heinrich-Heine-University, Duesseldorf, Germany.
#  All right reserved.
#  Email: geliudie@uni-duesseldorf.de
#
#  This file is part of cplexAPI.
#
#  CplexAPI is free software: you can redistribute it and/or modify
#  it under the terms of the GNU General Public License as published by
#  the Free Software Foundation, either version 3 of the License, or
#  (at your option) any later version.
#
#  CplexAPI is distributed in the hope that it will be useful,
#  but WITHOUT ANY WARRANTY; without even the implied warranty of
#  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
#  GNU General Public License for more details.
#
#  You should have received a copy of the GNU General Public License
#  along with cplexAPI.  If not, see <http://www.gnu.org/licenses/>.


.packageName <- "cplexAPI"

# Finalize function for cplexAPI:
finalize <- function(env) {
    .Call("finalizeCPLEX", PACKAGE = "cplexAPI")
}

.onLoad <- function(libname, pkgname) {
    .Call("initCPLEX", PACKAGE = "cplexAPI")
    
    # set finalizer for namespace:cplexAPI environment:
    parent <- parent.env(environment())
    reg.finalizer(parent, finalize, onexit = TRUE)
}

#.onAttach <- function(libname, pkgname) {
#    tmp <- openEnvCPLEX()
#    packageStartupMessage("using IBM ILOG CPLEX version ", getVersionCPLEX(tmp))
#    closeEnvCPLEX(tmp)
#}