Object
~~|
~~+--
Verbose
~~~~~~~|
~~~~~~~+--
NullVerbose
NullVerbose(...)
verbose <- Verbose() cat(verbose, "A verbose messages") verbose <- NullVerbose() cat(verbose, "A verbose messages") # Ignored
Run the code above in your browser using DataCamp Workspace