2010-09-01 15:24:14 -05:00
|
|
|
import std._uint;
|
2010-09-23 19:16:34 -05:00
|
|
|
import std._int;
|
2010-09-01 15:24:14 -05:00
|
|
|
|
|
|
|
type pos = rec(uint line, uint col);
|
|
|
|
type span = rec(str filename, pos lo, pos hi);
|
2010-08-18 13:34:47 -05:00
|
|
|
|
2010-09-09 17:59:29 -05:00
|
|
|
tag ty_mach {
|
2010-09-21 01:56:43 -05:00
|
|
|
ty_i8;
|
|
|
|
ty_i16;
|
|
|
|
ty_i32;
|
|
|
|
ty_i64;
|
|
|
|
|
|
|
|
ty_u8;
|
|
|
|
ty_u16;
|
|
|
|
ty_u32;
|
|
|
|
ty_u64;
|
|
|
|
|
|
|
|
ty_f32;
|
|
|
|
ty_f64;
|
2010-09-09 17:59:29 -05:00
|
|
|
}
|
2010-08-18 13:34:47 -05:00
|
|
|
|
2010-08-20 13:41:34 -05:00
|
|
|
fn ty_mach_to_str(ty_mach tm) -> str {
|
|
|
|
alt (tm) {
|
2010-09-21 01:56:43 -05:00
|
|
|
case (ty_u8) { ret "u8"; }
|
|
|
|
case (ty_u16) { ret "u16"; }
|
|
|
|
case (ty_u32) { ret "u32"; }
|
|
|
|
case (ty_u64) { ret "u64"; }
|
|
|
|
|
|
|
|
case (ty_i8) { ret "i8"; }
|
|
|
|
case (ty_i16) { ret "i16"; }
|
|
|
|
case (ty_i32) { ret "i32"; }
|
|
|
|
case (ty_i64) { ret "i64"; }
|
|
|
|
|
|
|
|
case (ty_f32) { ret "f32"; }
|
|
|
|
case (ty_f64) { ret "f64"; }
|
2010-08-20 13:41:34 -05:00
|
|
|
}
|
|
|
|
}
|
|
|
|
|
2010-09-21 18:22:32 -05:00
|
|
|
fn new_str_hash[V]() -> std.map.hashmap[str,V] {
|
|
|
|
let std.map.hashfn[str] hasher = std._str.hash;
|
|
|
|
let std.map.eqfn[str] eqer = std._str.eq;
|
|
|
|
ret std.map.mk_hashmap[str,V](hasher, eqer);
|
|
|
|
}
|
|
|
|
|
2010-09-23 19:16:34 -05:00
|
|
|
fn istr(int i) -> str {
|
|
|
|
ret _int.to_str(i, 10u);
|
|
|
|
}
|
|
|
|
|
2010-08-18 13:34:47 -05:00
|
|
|
//
|
|
|
|
// Local Variables:
|
|
|
|
// mode: rust
|
|
|
|
// fill-column: 78;
|
|
|
|
// indent-tabs-mode: nil
|
|
|
|
// c-basic-offset: 4
|
|
|
|
// buffer-file-coding-system: utf-8-unix
|
|
|
|
// compile-command: "make -k -C ../.. 2>&1 | sed -e 's/\\/x\\//x:\\//g'";
|
|
|
|
// End:
|
|
|
|
//
|