lean2/tests/lean/struct_class.lean

structure point [class] (A : Type) (B : Type) :=
mk :: (x : A) (y : B)

print classes

structure point2 (A : Type) (B : Type) :=
mk :: (x : A) (y : B)

print classes
feat(frontends/lean/structure_cmd): mark structure as 'class' when [class] modifier is used 2014-11-04 01:46:03 +00:00			`structure point [class] (A : Type) (B : Type) :=`
			`mk :: (x : A) (y : B)`

			`print classes`

			`structure point2 (A : Type) (B : Type) :=`
			`mk :: (x : A) (y : B)`

			`print classes`