view tests/mproj.ur @ 2126:ec1614fb97bb

Change MonoReduce to do fixed-pointing, since it sometimes enables more optimizations for itself (e.g., yanking lambdas out of [case]s)
author Adam Chlipala <adam@chlipala.net>
date Fri, 06 Mar 2015 09:46:21 -0500
parents e571fb150a9f
children
line wrap: on
line source
structure M : sig
    type t
    val x : t

    structure S : sig
        type u = t

        val eq : eq u
    end
end = struct
    type t = int
    val x = 0

    structure S = struct
        type u = t

        val eq = _
    end
end

val y = M.x = M.x