src/test/run-pass/foreign-fn-linkname.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 // ignore-fast doesn't like extern crate
  12
  13 extern crate libc;
  14
  15 mod mlibc {
  16     extern crate libc;
  17     use self::libc::{c_char, size_t};
  18
  19     extern {
  20         #[link_name = "strlen"]
  21         pub fn my_strlen(str: *c_char) -> size_t;
  22     }
  23 }
  24
  25 fn strlen(str: ~str) -> uint {
  26     // C string is terminated with a zero
  27     str.with_c_str(|buf| {
  28         unsafe {
  29             mlibc::my_strlen(buf) as uint
  30         }
  31     })
  32 }
  33
  34 pub fn main() {
  35     let len = strlen(~"Rust");
  36     assert_eq!(len, 4u);
  37 }