lean4-htt/tests/lean/io_bug2.lean
Leonardo de Moura 2c0a5a5120 fix(library/compiler/erase_irrelevant): remove broken io monad optimization
It doesn't work when combined with inlining and common-subexpression-elimination
2017-02-07 21:24:31 -08:00

8 lines
138 B
Text
Raw Blame History

This file contains ambiguous Unicode characters

This file contains Unicode characters that might be confused with other characters. If you think that this is intentional, you can safely ignore this warning. Use the Escape button to reveal them.

import system.io
def main : io unit := do
put_str_ln "t1",
(x, y) ← return ((1 : nat), (2 : )),
put_str_ln "t2"
vm_eval main