view BiodbObserver.R @ 2:20d69a062da3 draft

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

# 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) {
})