fa1da03d50
This PR updates the styling and wording of error messages produced in inductive type declarations and anonymous constructor notation, including hints for inferable constructor visibility updates.
75 lines
1.8 KiB
Text
75 lines
1.8 KiB
Text
module
|
|
/-!
|
|
# Visibility hints for fields and constructors
|
|
|
|
This test assess error message hints for fields and constructors with invalid visibilities where the
|
|
necessary correction is reasonably unambiguous.
|
|
-/
|
|
|
|
/--
|
|
error: Constructor must be `private` because one or more of this structure's fields are `private`
|
|
|
|
Hint: Mark constructor as `private`
|
|
p̵r̵o̵t̵e̵c̵t̵e̵d̵p̲r̲i̲v̲a̲t̲e̲ mk ::
|
|
-/
|
|
#guard_msgs in
|
|
structure Foo where
|
|
protected mk ::
|
|
private foo : Nat
|
|
|
|
/--
|
|
error: Constructor must be `private` because one or more of this structure's fields are `private`
|
|
|
|
Hint: Mark constructor as `private`
|
|
p̲r̲i̲v̲a̲t̲e̲ ̲mk ::
|
|
-/
|
|
#guard_msgs in
|
|
structure Foo where
|
|
/-- doc -/
|
|
mk ::
|
|
private foo : Nat
|
|
|
|
/--
|
|
error: Constructor must be `private` because one or more of this structure's fields are `private`
|
|
|
|
Hint: Mark constructor as `private`
|
|
p̲r̲i̲v̲a̲t̲e̲ ̲mk ::
|
|
-/
|
|
#guard_msgs in
|
|
structure Foo where
|
|
mk ::
|
|
private foo : Nat
|
|
|
|
/--
|
|
error: Field cannot be marked `private` because it is already in a `private` structure
|
|
|
|
Hint: Remove `private` modifier from field
|
|
p̵r̵i̵v̵a̵t̵e̵ ̵bar : Nat
|
|
-/
|
|
#guard_msgs in
|
|
private structure Bar where
|
|
private bar : Nat
|
|
|
|
/--
|
|
error: Constructor cannot be marked `private` because it is already in a `private` structure
|
|
|
|
Hint: Remove `private` modifier from constructor
|
|
p̵r̵i̵v̵a̵t̵e̵ ̵mk ::
|
|
-/
|
|
#guard_msgs in
|
|
private structure Bar' where
|
|
/-- doc -/
|
|
private mk ::
|
|
bar' : Nat
|
|
|
|
/--
|
|
error: Duplicate doc string
|
|
---
|
|
error: Constructor cannot be marked `private` because it is already in a `private` inductive datatype
|
|
|
|
Hint: Remove `private` modifier from constructor
|
|
p̵r̵i̵v̵a̵t̵e̵ ̵baz
|
|
-/
|
|
#guard_msgs in
|
|
private inductive Baz where
|
|
/-- doc -/ | /-- doc -/ private baz (x : Nat) : Baz
|