diff options
Diffstat (limited to 'syntax')
| -rw-r--r-- | syntax/PPTactic.v | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/syntax/PPTactic.v b/syntax/PPTactic.v index 517c522f4e..05effb2430 100644 --- a/syntax/PPTactic.v +++ b/syntax/PPTactic.v @@ -317,7 +317,8 @@ Syntax tactic | reduce_hnf [<<(REDEXP (Hnf))>>] -> ["Hnf"] | reduce_simpl [<<(REDEXP (Simpl))>>] -> ["Simpl"] | reduce_cbv [<<(REDEXP (Cbv ($LIST $lf)))>>] -> ["Cbv" (FLAGS ($LIST $lf))] - | reduce_compute [<<(REDEXP (Cbv (Beta) (Delta) (Iota)))>>] -> [ "Compute" ] + | reduce_compute [<<(REDEXP (Cbv (Beta) (Delta) (Iota) (Zeta)))>>] -> + [ "Compute" ] | reduce_lazy [<<(REDEXP (Lazy ($LIST $lf)))>>] -> ["Lazy" (FLAGS ($LIST $lf))] | reduce_unfold [<<(REDEXP (Unfold ($LIST $unf)))>>] -> @@ -334,6 +335,8 @@ Syntax tactic [ [1 0] "Delta" (FLAGS ($LIST $F))] | flags_iota [<<(FLAGS (Iota) ($LIST $F))>>] -> [ [1 0] "Iota" (FLAGS ($LIST $F))] + | flags_zeta [<<(FLAGS (Zeta) ($LIST $F))>>] -> + [ [1 0] "Zeta" (FLAGS ($LIST $F))] | delta_unf [<<(FLAGS (Unf ($LIST $idl)) ($LIST $F))>>] -> [ [1 0] "[" [<hov 0> (LISTSPC ($LIST $idl)) ] "]" (FLAGS ($LIST $F))] |