summaryrefslogtreecommitdiff
path: root/demo/metaform1.ur
blob: 2f3356fa7bc3404bcca6ce440ab1f770772242c4 (plain)
1
2
3
4
open Metaform.Make(struct
                       val names = {A = "Tic", B = "Tac", C = "Toe"}
                       val fl = Folder.cons [#A] [()] ! (Folder.cons [#B] [()] ! (Folder.cons [#C] [()] ! Folder.nil))
                   end)