diff options
Diffstat (limited to 'tuto0/src')
| -rw-r--r-- | tuto0/src/g_tuto0.mlg (renamed from tuto0/src/g_tuto0.ml4) | 10 |
1 files changed, 7 insertions, 3 deletions
diff --git a/tuto0/src/g_tuto0.ml4 b/tuto0/src/g_tuto0.mlg index d6e95ba0f7..5c633fe862 100644 --- a/tuto0/src/g_tuto0.ml4 +++ b/tuto0/src/g_tuto0.mlg @@ -1,14 +1,18 @@ DECLARE PLUGIN "tuto0_plugin" +{ + open Pp open Ltac_plugin +} + VERNAC COMMAND EXTEND HelloWorld CLASSIFIED AS QUERY -| [ "HelloWorld" ] -> [ Feedback.msg_notice (strbrk Tuto0_main.message) ] +| [ "HelloWorld" ] -> { Feedback.msg_notice (strbrk Tuto0_main.message) } END TACTIC EXTEND hello_world_tactic | [ "hello_world" ] -> - [ let _ = Feedback.msg_notice (str Tuto0_main.message) in - Tacticals.New.tclIDTAC ] + { let _ = Feedback.msg_notice (str Tuto0_main.message) in + Tacticals.New.tclIDTAC } END |