File tree Expand file tree Collapse file tree 2 files changed +6
-1
lines changed
Expand file tree Collapse file tree 2 files changed +6
-1
lines changed Original file line number Diff line number Diff line change @@ -79,7 +79,7 @@ def funPropTac : Tactic
7979 unless (← getFunProp? type).isSome do
8080 let hint :=
8181 if let some n := type.getAppFn.constName?
82- then s! " Maybe you forgot marking `{ n} ` with `@[fun_prop]`."
82+ then s! " Consider marking `{ n} ` with `@[fun_prop]`."
8383 else ""
8484 throwError "`{← ppExpr type}` is not a `fun_prop` goal!{hint}"
8585
Original file line number Diff line number Diff line change @@ -397,6 +397,11 @@ end MultipleLambdaTheorems
397397#guard_msgs in
398398#check_failure ((by fun_prop) : ?m)
399399
400+ /-- error: `Injective Nat.succ` is not a `fun_prop` goal!
401+ Consider marking `Function.Injective` with `@[fun_prop]`. -/
402+ #guard_msgs in
403+ example : Nat.succ.Injective := by fun_prop
404+
400405-- todo: warning should not have mvar id in it
401406-- /-- warning: `?m.71721` is not a `fun_prop` goal! -/
402407-- #guard_msgs in
You can’t perform that action at this time.
0 commit comments