view demo/metaform1.ur @ 495:98f85c1bc867

Fix type calculation for applying-a-case optimization
author Adam Chlipala <adamc@hcoop.net>
date Tue, 11 Nov 2008 20:24:55 -0500
parents ad7e854a518c
children 6c4643880df5
line wrap: on
line source
open Metaform.Make(struct
                       val names = {A = "Tic", B = "Tac", C = "Toe"}
                   end)