From 290206b17890a76f96979ad629203d965ff35d1c Mon Sep 17 00:00:00 2001
From: Tim Chevalier <chevalier@alum.wellesley.edu>
Date: Thu, 21 Jun 2012 16:02:29 -0700
Subject: [PATCH] Add test for issue 2214

---
 src/test/run-pass/issue-2214.rs | 18 ++++++++++++++++++
 1 file changed, 18 insertions(+)
 create mode 100644 src/test/run-pass/issue-2214.rs

diff --git a/src/test/run-pass/issue-2214.rs b/src/test/run-pass/issue-2214.rs
new file mode 100644
index 00000000000..13be6c67dad
--- /dev/null
+++ b/src/test/run-pass/issue-2214.rs
@@ -0,0 +1,18 @@
+import libc::{c_double, c_int};
+
+fn lgamma(n: c_double, value: &mut int) -> c_double {
+  ret m::lgamma(n, value as &mut c_int);
+}
+
+#[link_name = "m"]
+#[abi = "cdecl"]
+native mod m {
+    #[link_name="lgamma_r"] fn lgamma(n: c_double, sign: &mut c_int)
+      -> c_double;
+}
+
+fn main() {
+  let mut y: int = 5;
+  let x: &mut int = &mut y;
+  assert (lgamma(1.0 as c_double, x) == 42.0 as c_double);
+}
\ No newline at end of file