0e49576fe4
This PR makes `#guard_msgs` to treat `trace` messages separate from `info`, `warning` and `error`. It also introduce the ability to say `#guard_msgs (pass info`, like `(drop info)` so far, and also adds `(check info)` as the explicit form of `(info)`, for completeness. Fixes #8266
12 lines
479 B
Text
12 lines
479 B
Text
open List
|
|
reset_grind_attrs%
|
|
set_option grind.warning false
|
|
|
|
attribute [grind →] Array.eq_empty_of_append_eq_empty eq_nil_of_length_eq_zero
|
|
attribute [grind] Vector.getElem?_append getElem?_dropLast
|
|
|
|
#guard_msgs (trace) in -- should not report any issues
|
|
set_option trace.grind.issues true
|
|
theorem dropLast_concat : dropLast (l₁ ++ [b]) = l₁ := by
|
|
fail_if_success grind (gen := 6)
|
|
grind -ext only [List.dropLast_append_cons, List.dropLast_singleton, List.append_nil]
|