// 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;

pub fn main() {
    // Chars of 1, 2, 3, and 4 bytes
    let chs: ~[char] = ~['e', 'é', '€', 0x10000 as char];
    let s: ~str = str::from_chars(chs);

    assert!((str::len(s) == 10u));
    assert!((str::char_len(s) == 4u));
    assert!((vec::len(str::to_chars(s)) == 4u));
    assert!((str::from_chars(str::to_chars(s)) == s));
    assert!((str::char_at(s, 0u) == 'e'));
    assert!((str::char_at(s, 1u) == 'é'));

    assert!((str::is_utf8(str::to_bytes(s))));
    assert!((!str::is_utf8(~[0x80_u8])));
    assert!((!str::is_utf8(~[0xc0_u8])));
    assert!((!str::is_utf8(~[0xc0_u8, 0x10_u8])));

    let mut stack = ~"a×c€";
    assert!((str::pop_char(&mut stack) == '€'));
    assert!((str::pop_char(&mut stack) == 'c'));
    str::push_char(&mut stack, 'u');
    assert!((stack == ~"a×u"));
    assert!((str::shift_char(&mut stack) == 'a'));
    assert!((str::shift_char(&mut stack) == '×'));
    str::unshift_char(&mut stack, 'ß');
    assert!((stack == ~"ßu"));
}