view BiodbObserver.R @ 4:1ba222315fd5 draft

planemo upload for repository https://github.com/workflow4metabolomics/lcmsmatching.git commit 947b8707b06176a4801de64a71c8771617311ffb

# vi: fdm=marker

##########################
# CLASS DECLARATION {{{1 #
##########################

BiodbObserver <- methods::setRefClass("BiodbObserver", fields = list())

###################
# CONSTANTS {{{ 1 #
###################

MSG.INFO <- 'INFO'
MSG.DEBUG <- 'DEBUG'
MSG.WARNING <- 'WARNING'
MSG.ERROR <- 'ERROR'

.MSG.TYPES <- c(MSG.ERROR, MSG.WARNING, MSG.DEBUG, MSG.INFO)

################
# MESSAGE {{{1 #
################

BiodbObserver$methods( message = function(type = MSG.INFO, msg, level = 1) {
})