Add test for issue 2214

This commit is contained in:
Tim Chevalier 2012-06-21 16:02:29 -07:00
parent 2a53640aa1
commit 290206b178
1 changed files with 18 additions and 0 deletions

View File

@ -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);
}