annotate 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
rev   line source
adamc@418 1 open Metaform.Make(struct
adamc@418 2 val names = {A = "Tic", B = "Tac", C = "Toe"}
adamc@418 3 end)