# HG changeset patch
# User Mike Pavone <pavone@retrodev.com>
# Date 1342266811 25200
# Node ID 38127fbf5f9d0ed867064b89918f8a7d13b55ae8
# Parent  86ebdfb33711ace8628bbfa1f59f632c7f6b1b4c
Add sample for bug involving accesing a property of a parent object as an initial value for a new object property

diff -r 86ebdfb33711 -r 38127fbf5f9d samples/compilerbug_004.tp
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/samples/compilerbug_004.tp	Sat Jul 14 04:53:31 2012 -0700
@@ -0,0 +1,14 @@
+#{
+	foo <- 42
+	new <- {
+		#{
+			bar <- foo
+		}
+	}
+
+	main <- {
+		print: (string: ((new: ) bar)) . "\n"
+	}
+
+}
+