blob: e7d0bfe1f8f9cc5b6d1485540e908e971c16a424 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
|
open API
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
|