src/test/run-pass/extern/extern-call-deep.rs

   1 // Copyright 2012 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.
   4 //
   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.
  10
  11 // run-pass
  12 // ignore-wasm32-bare no libc to test ffi with
  13
  14 #![feature(rustc_private)]
  15
  16 extern crate libc;
  17
  18 mod rustrt {
  19     extern crate libc;
  20
  21     #[link(name = "rust_test_helpers", kind = "static")]
  22     extern {
  23         pub fn rust_dbg_call(cb: extern "C" fn(libc::uintptr_t) -> libc::uintptr_t,
  24                              data: libc::uintptr_t)
  25                              -> libc::uintptr_t;
  26     }
  27 }
  28
  29 extern fn cb(data: libc::uintptr_t) -> libc::uintptr_t {
  30     if data == 1 {
  31         data
  32     } else {
  33         count(data - 1) + 1
  34     }
  35 }
  36
  37 fn count(n: libc::uintptr_t) -> libc::uintptr_t {
  38     unsafe {
  39         println!("n = {}", n);
  40         rustrt::rust_dbg_call(cb, n)
  41     }
  42 }
  43
  44 pub fn main() {
  45     let result = count(1000);
  46     println!("result = {}", result);
  47     assert_eq!(result, 1000);
  48 }