Made addChild bind friendly
Merge pull request #1 from krisis/master

Readability of Example.hs