comparison BiodbObserver.R @ 1:45e985cd8e9e draft

planemo upload for repository https://github.com/workflow4metabolomics/lcmsmatching.git commit d4048accde6bdfd5b3e14f5394902d38991854f8-dirty
author prog
date Tue, 31 Jan 2017 05:27:24 -0500
parents
children
comparison
equal deleted inserted replaced
0:3afe41d3e9e7 1:45e985cd8e9e
1 # vi: fdm=marker
2
3 ##########################
4 # CLASS DECLARATION {{{1 #
5 ##########################
6
7 BiodbObserver <- methods::setRefClass("BiodbObserver", fields = list())
8
9 ###################
10 # CONSTANTS {{{ 1 #
11 ###################
12
13 MSG.INFO <- 'INFO'
14 MSG.DEBUG <- 'DEBUG'
15 MSG.WARNING <- 'WARNING'
16 MSG.ERROR <- 'ERROR'
17
18 .MSG.TYPES <- c(MSG.ERROR, MSG.WARNING, MSG.DEBUG, MSG.INFO)
19
20 ################
21 # MESSAGE {{{1 #
22 ################
23
24 BiodbObserver$methods( message = function(type = MSG.INFO, msg, level = 1) {
25 })