Set and Get Verbosity Level.

Set and get the global verbosity level.

set_verbosity(level = 2L)

get_verbosity()

Arguments

level	A scalar (integer vector of length one), possibly -Inf or +Inf.

Details

Messages are generated, accordingly to the following levels:

Level 0.

None.

Level 1.

Operations modifying the internal state.

Level 2 (default).

All operations.

Level +Inf.

Debugging informations.

See also

define, make, reset, and touch.

Examples

reset()
#> [2018-12-02T17:14:10 CET] Resetting modulr state ... OK
set_verbosity(+Inf)
define("foo", NULL, function() "Hello World")
#> [2018-12-02T17:14:10 CET] Entering define() for 'foo' ...
#> [2018-12-02T17:14:10 CET] Defining 'foo' ... OK
define("bar", list(f = "foo"), function(f) sprintf("*%s*", f))
#> [2018-12-02T17:14:10 CET] Entering define() for 'bar' ...
#> [2018-12-02T17:14:10 CET] Defining 'bar' ... OK
make()
#> [2018-12-02T17:14:10 CET] Entering make() for 'bar' ...
#> [2018-12-02T17:14:10 CET] Making 'bar' ...
#> [2018-12-02T17:14:10 CET] * Visiting and defining dependencies ...
#> [2018-12-02T17:14:10 CET] ** Entering load_module() for 'bar' ...
#> [2018-12-02T17:14:10 CET] ** Entering load_module() for 'foo' ...
#> [2018-12-02T17:14:10 CET] * Constructing dependency graph ... OK
#> [2018-12-02T17:14:10 CET] * Entering get_digest() for 'bar' ...
#> [2018-12-02T17:14:10 CET] * Entering get_digest() for 'foo' ...
#> [2018-12-02T17:14:10 CET] * Evaluating #1/1 (layer #1/1): 'foo' ...
#> [2018-12-02T17:14:10 CET] * Entering get_digest() for 'bar' ...
#> [2018-12-02T17:14:10 CET] DONE ('bar' in 0.052 secs)
#> [1] "*Hello World*"
touch("foo")
#> [2018-12-02T17:14:10 CET] Entering touch() for 'foo' ...
#> [2018-12-02T17:14:10 CET] Touching 'foo' ... OK
make("bar")
#> [2018-12-02T17:14:10 CET] Entering make() for 'bar' ...
#> [2018-12-02T17:14:10 CET] Making 'bar' ...
#> [2018-12-02T17:14:10 CET] * Visiting and defining dependencies ...
#> [2018-12-02T17:14:10 CET] ** Entering load_module() for 'bar' ...
#> [2018-12-02T17:14:10 CET] ** Entering load_module() for 'foo' ...
#> [2018-12-02T17:14:10 CET] * Constructing dependency graph ... OK
#> [2018-12-02T17:14:10 CET] * Entering get_digest() for 'bar' ...
#> [2018-12-02T17:14:10 CET] * Entering get_digest() for 'foo' ...
#> [2018-12-02T17:14:10 CET] * Evaluating #1/1 (layer #1/1): 'foo' ...
#> [2018-12-02T17:14:10 CET] * Entering get_digest() for 'bar' ...
#> [2018-12-02T17:14:10 CET] DONE ('bar' in 0.056 secs)
#> [1] "*Hello World*"

reset()
#> [2018-12-02T17:14:10 CET] Entering reset() ...
#> [2018-12-02T17:14:10 CET] Resetting modulr state ... OK
set_verbosity(2)
define("foo", NULL, function() "Hello World")
#> [2018-12-02T17:14:10 CET] Defining 'foo' ... OK
define("bar", list(f = "foo"), function(f) sprintf("*%s*", f))
#> [2018-12-02T17:14:10 CET] Defining 'bar' ... OK
make()
#> [2018-12-02T17:14:10 CET] Making 'bar' ...
#> [2018-12-02T17:14:10 CET] * Visiting and defining dependencies ...
#> [2018-12-02T17:14:10 CET] * Constructing dependency graph ... OK
#> [2018-12-02T17:14:10 CET] * Evaluating #1/1 (layer #1/1): 'foo' ...
#> [2018-12-02T17:14:10 CET] DONE ('bar' in 0.075 secs)
#> [1] "*Hello World*"
touch("foo")
#> [2018-12-02T17:14:10 CET] Touching 'foo' ... OK
make("bar")
#> [2018-12-02T17:14:10 CET] Making 'bar' ...
#> [2018-12-02T17:14:10 CET] * Visiting and defining dependencies ...
#> [2018-12-02T17:14:10 CET] * Constructing dependency graph ... OK
#> [2018-12-02T17:14:10 CET] * Evaluating #1/1 (layer #1/1): 'foo' ...
#> [2018-12-02T17:14:10 CET] DONE ('bar' in 0.054 secs)
#> [1] "*Hello World*"

reset()
#> [2018-12-02T17:14:10 CET] Resetting modulr state ... OK
set_verbosity(1L)
define("foo", NULL, function() "Hello World")
define("bar", list(f = "foo"), function(f) sprintf("*%s*", f))
make()
#> [2018-12-02T17:14:10 CET] Evaluating #1/1 (layer #1/1): 'foo' ...
#> [1] "*Hello World*"
touch("foo")
make("bar")
#> [2018-12-02T17:14:10 CET] Evaluating #1/1 (layer #1/1): 'foo' ...
#> [1] "*Hello World*"

reset()
set_verbosity(0L)
define("foo", NULL, function() "Hello World")
define("bar", list(f = "foo"), function(f) sprintf("*%s*", f))
make()
#> [1] "*Hello World*"
touch("foo")
make("bar")
#> [1] "*Hello World*"