Add a test for binding bare functions

Issue #1022

src/test/run-pass/fn-bare-bind.rs

@@ -0,0 +1,9 @@
+fn# f(i: int) {
+    assert i == 10;
+}
+
+fn main() {
+    // Binding a bare function turns it into a shared closure
+    let g: fn() = bind f(10);
+    g();
+}