2012-08-14 18:25:42 -05:00
|
|
|
// NB: transitionary, de-mode-ing.
|
|
|
|
#[forbid(deprecated_mode)];
|
|
|
|
#[forbid(deprecated_pattern)];
|
2012-07-10 17:52:05 -05:00
|
|
|
//! Runtime calls emitted by the compiler.
|
|
|
|
|
2012-09-04 13:12:17 -05:00
|
|
|
use libc::c_char;
|
|
|
|
use libc::c_void;
|
|
|
|
use libc::size_t;
|
|
|
|
use libc::uintptr_t;
|
2012-07-10 17:52:05 -05:00
|
|
|
|
2012-09-07 20:08:21 -05:00
|
|
|
use gc::{cleanup_stack_for_failure, gc, Word};
|
2012-07-16 14:28:15 -05:00
|
|
|
|
2012-09-02 17:39:37 -05:00
|
|
|
#[allow(non_camel_case_types)]
|
2012-07-17 12:48:19 -05:00
|
|
|
type rust_task = c_void;
|
2012-07-10 17:52:05 -05:00
|
|
|
|
|
|
|
extern mod rustrt {
|
|
|
|
#[rust_stack]
|
|
|
|
fn rust_upcall_fail(expr: *c_char, file: *c_char, line: size_t);
|
2012-07-17 12:48:19 -05:00
|
|
|
|
|
|
|
#[rust_stack]
|
|
|
|
fn rust_upcall_exchange_malloc(td: *c_char, size: uintptr_t) -> *c_char;
|
|
|
|
|
|
|
|
#[rust_stack]
|
|
|
|
fn rust_upcall_exchange_free(ptr: *c_char);
|
|
|
|
|
|
|
|
#[rust_stack]
|
|
|
|
fn rust_upcall_malloc(td: *c_char, size: uintptr_t) -> *c_char;
|
|
|
|
|
|
|
|
#[rust_stack]
|
|
|
|
fn rust_upcall_free(ptr: *c_char);
|
2012-07-10 17:52:05 -05:00
|
|
|
}
|
|
|
|
|
|
|
|
// FIXME (#2861): This needs both the attribute, and the name prefixed with
|
|
|
|
// 'rt_', otherwise the compiler won't find it. To fix this, see
|
|
|
|
// gather_rust_rtcalls.
|
|
|
|
#[rt(fail)]
|
|
|
|
fn rt_fail(expr: *c_char, file: *c_char, line: size_t) {
|
2012-07-16 14:28:15 -05:00
|
|
|
cleanup_stack_for_failure();
|
2012-07-10 17:52:05 -05:00
|
|
|
rustrt::rust_upcall_fail(expr, file, line);
|
|
|
|
}
|
|
|
|
|
2012-07-17 12:48:19 -05:00
|
|
|
#[rt(exchange_malloc)]
|
|
|
|
fn rt_exchange_malloc(td: *c_char, size: uintptr_t) -> *c_char {
|
2012-08-01 19:30:05 -05:00
|
|
|
return rustrt::rust_upcall_exchange_malloc(td, size);
|
2012-07-17 12:48:19 -05:00
|
|
|
}
|
|
|
|
|
2012-07-23 18:00:19 -05:00
|
|
|
// NB: Calls to free CANNOT be allowed to fail, as throwing an exception from
|
|
|
|
// inside a landing pad may corrupt the state of the exception handler. If a
|
|
|
|
// problem occurs, call exit instead.
|
2012-07-17 12:48:19 -05:00
|
|
|
#[rt(exchange_free)]
|
|
|
|
fn rt_exchange_free(ptr: *c_char) {
|
|
|
|
rustrt::rust_upcall_exchange_free(ptr);
|
|
|
|
}
|
|
|
|
|
|
|
|
#[rt(malloc)]
|
|
|
|
fn rt_malloc(td: *c_char, size: uintptr_t) -> *c_char {
|
2012-08-01 19:30:05 -05:00
|
|
|
return rustrt::rust_upcall_malloc(td, size);
|
2012-07-17 12:48:19 -05:00
|
|
|
}
|
|
|
|
|
2012-07-23 18:00:19 -05:00
|
|
|
// NB: Calls to free CANNOT be allowed to fail, as throwing an exception from
|
|
|
|
// inside a landing pad may corrupt the state of the exception handler. If a
|
|
|
|
// problem occurs, call exit instead.
|
2012-07-17 12:48:19 -05:00
|
|
|
#[rt(free)]
|
|
|
|
fn rt_free(ptr: *c_char) {
|
|
|
|
rustrt::rust_upcall_free(ptr);
|
|
|
|
}
|
|
|
|
|
2012-07-10 17:52:05 -05:00
|
|
|
// Local Variables:
|
|
|
|
// mode: rust;
|
|
|
|
// fill-column: 78;
|
|
|
|
// indent-tabs-mode: nil
|
|
|
|
// c-basic-offset: 4
|
|
|
|
// buffer-file-coding-system: utf-8-unix
|
|
|
|
// End:
|