view BiodbObserver.R @ 4:b34c14151f25 draft

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

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