blob: 72765abe048e823615fb1b336e0a3a1c901d37d8 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
|
open Ltac_plugin
DECLARE PLUGIN "test_plugin"
let () = Mltop.add_known_plugin (fun () -> ()) "test_plugin";;
VERNAC COMMAND EXTEND Test CLASSIFIED AS SIDEFF
| [ "TestCommand" ] -> [ () ]
END
TACTIC EXTEND test
| [ "test_tactic" ] -> [ Test_aux.tac ]
END
|