3 // Copyright 2012 The Rust Project Developers. See the COPYRIGHT
4 // file at the top-level directory of this distribution and at
5 // http://rust-lang.org/COPYRIGHT.
7 // Licensed under the Apache License, Version 2.0 <LICENSE-APACHE or
8 // http://www.apache.org/licenses/LICENSE-2.0> or the MIT license
9 // <LICENSE-MIT or http://opensource.org/licenses/MIT>, at your
10 // option. This file may not be copied, modified, or distributed
11 // except according to those terms.
14 use std::libc::{c_double, c_int};
16 fn to_c_int(v: &mut int) -> &mut c_int {
18 cast::transmute_copy(&v)
22 fn lgamma(n: c_double, value: &mut int) -> c_double {
24 return m::lgamma(n, to_c_int(value));
29 use std::libc::{c_double, c_int};
35 #[link_name="lgamma_r"]
36 pub fn lgamma(n: c_double, sign: &mut c_int) -> c_double;
38 #[link_name="__lgamma_r"]
39 pub fn lgamma(n: c_double, sign: &mut c_int) -> c_double;
45 let x: &mut int = &mut y;
46 assert_eq!(lgamma(1.0 as c_double, x), 0.0 as c_double);