// Copyright 2012 The Rust Project Developers. See the COPYRIGHT
// file at the top-level directory of this distribution and at
// http://rust-lang.org/COPYRIGHT.
//
// Licensed under the Apache License, Version 2.0 <LICENSE-APACHE or
// http://www.apache.org/licenses/LICENSE-2.0> or the MIT license
// <LICENSE-MIT or http://opensource.org/licenses/MIT>, at your
// option. This file may not be copied, modified, or distributed
// except according to those terms.

extern mod std;


#[nolink]
#[abi = "cdecl"]
extern mod libc {
    #[legacy_exports];
    #[link_name = "strlen"]
    fn my_strlen(str: *u8) -> uint;
}

fn strlen(str: ~str) -> uint unsafe {
    // C string is terminated with a zero
    let bytes = str::to_bytes(str) + ~[0u8];
    return libc::my_strlen(vec::raw::to_ptr(bytes));
}

fn main() {
    let len = strlen(~"Rust");
    assert(len == 4u);
}