ref: 0500ef75d99bab9efd7932a9361ad3bebcb524b2
parent: 9f7256a2c8174fc94b8ceafa13b0a7960083edc1
author: Ori Bernstein <[email protected]>
date: Wed Jan 16 20:35:23 EST 2013
Add missing file.
--- /dev/null
+++ b/test/genericrec.myr
@@ -1,0 +1,11 @@
+/* test that generic types can be recursive, as long as they're not self
+ * including. This just needs to compile and exit with 0. */
+type list(@t) = struct
+ val : @t
+ next : list(@t)*
+;;
+
+const main = {
+ var v : list(int)
+ -> 0
+}