blob: 33d6d9cab1aad514a3c24d70d6870ac97da80ffb (
plain)
1
2
3
4
5
6
7
8
9
10
|
(* $Id$ *)
Declare ML Module "refine".
Grammar tactic simple_tactic: ast :=
tcc [ "Refine" castedopenconstrarg($c) ] -> [(Tcc $c)].
Syntax tactic level 0:
tcc [(Tcc $C)] -> ["Refine " $C].
|