lean4-htt/tests/lean/inliner_loop.lean
Leonardo de Moura 1ebdb9f1b1 fix(library/compiler): do not inline definitions using unsafe inductives
This commit also makes sure that `has_trivial_structure` returns false
for `unsafe` inductive datatypes.

See new test for further details.
2019-03-28 16:07:57 -07:00

8 lines
138 B
Text

unsafe inductive t
| mk : (t → t) → t
unsafe def loop' : t → t
| (t.mk f) := f (t.mk f)
unsafe def loop : t :=
loop' (t.mk loop')