view BiodbObserver.R @ 3:f61ce21ed17c draft

planemo upload for repository https://github.com/workflow4metabolomics/lcmsmatching.git commit 476a081c0da66822f4e77070f5ce59d9f14511f4-dirty

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