From afe50be2ed547e0b8d83200bbec77b6037334678 Mon Sep 17 00:00:00 2001 From: Adam Chlipala Date: Sat, 13 Jun 2009 14:29:36 -0400 Subject: inside ; fix Specialize bug with datatype decls generating other mutually-recursive datatype decls --- tests/tbody.ur | 13 +++++++++++++ 1 file changed, 13 insertions(+) create mode 100644 tests/tbody.ur (limited to 'tests/tbody.ur') diff --git a/tests/tbody.ur b/tests/tbody.ur new file mode 100644 index 00000000..53bc0296 --- /dev/null +++ b/tests/tbody.ur @@ -0,0 +1,13 @@ +fun main () : transaction page = + s <- source []; + entry <- source ""; + return +
+ ) s)}/> +
{[s]}
+ + Add one: