Logs.HookSource***************
******************
***************
Tabulation
Indent a message by adding tabs at the beginning of each line
*******************
val on_before_exec :
Mopsa.Core.All.route ->
Mopsa.Core.All.stmt ->
('a, 'b) Mopsa.Core.All.man ->
'a Mopsa.Core.All.Flow.flow ->
unitval on_after_exec :
Mopsa.Core.All.route ->
Mopsa.Core.All.stmt ->
('a, 'b) Mopsa.Core.All.man ->
'c ->
('a, 'd) Mopsa.Core.All.Cases.cases ->
unitval on_before_eval :
Mopsa.Core.All.route ->
Mopsa.Core.All.semantic ->
Mopsa.Core.All.expr ->
('a, 'b) Mopsa.Core.All.man ->
'a Mopsa.Core.All.Flow.flow ->
unitval on_after_eval :
Mopsa.Core.All.route ->
Mopsa.Core.All.semantic ->
Mopsa.Core.All.expr ->
'a ->
'b ->
('c, Mopsa.Core.All.expr) Mopsa.Core.All.Cases.cases ->
unit