From a609e91b959d905fc10554e97df153c09769ec90 Mon Sep 17 00:00:00 2001
From: Adam Chlipala <adamc@hcoop.net>
Date: Tue, 24 Feb 2009 15:12:13 -0500
Subject: Demos compile again, with manual folders

---
 demo/crud.urs | 2 ++
 1 file changed, 2 insertions(+)

(limited to 'demo/crud.urs')

diff --git a/demo/crud.urs b/demo/crud.urs
index 8c9cebcf..b240b7c1 100644
--- a/demo/crud.urs
+++ b/demo/crud.urs
@@ -16,6 +16,8 @@ val bool : string -> colMeta (bool, bool)
 functor Make(M : sig
                  con cols :: {(Type * Type)}
                  constraint [Id] ~ cols
+                 val fl : folder cols
+
                  val tab : sql_table ([Id = int] ++ map fstTT cols)
 
                  val title : string
-- 
cgit v1.2.3