]>
git.proxmox.com Git - rustc.git/blob - src/test/run-pass/issue-2214.rs
1 // Copyright 2012-2014 The Rust Project Developers. See the COPYRIGHT
2 // file at the top-level directory of this distribution and at
3 // http://rust-lang.org/COPYRIGHT.
5 // Licensed under the Apache License, Version 2.0 <LICENSE-APACHE or
6 // http://www.apache.org/licenses/LICENSE-2.0> or the MIT license
7 // <LICENSE-MIT or http://opensource.org/licenses/MIT>, at your
8 // option. This file may not be copied, modified, or distributed
9 // except according to those terms.
17 use libc
::{c_double, c_int}
;
19 fn to_c_int(v
: &mut isize) -> &mut c_int
{
21 mem
::transmute_copy(&v
)
25 fn lgamma(n
: c_double
, value
: &mut isize) -> c_double
{
27 return m
::lgamma(n
, to_c_int(value
));
32 use libc
::{c_double, c_int}
;
37 #[link_name="lgamma_r"]
38 pub fn lgamma(n
: c_double
, sign
: &mut c_int
) -> c_double
;
40 #[link_name="__lgamma_r"]
41 pub fn lgamma(n
: c_double
, sign
: &mut c_int
) -> c_double
;
47 let x
: &mut isize = &mut y
;
48 assert_eq
!(lgamma(1.0 as c_double
, x
), 0.0 as c_double
);