1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59
// Copyright 2012-2013 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. // Reference: MSP430 Embedded Application Binary Interface // http://www.ti.com/lit/an/slaa534/slaa534.pdf #![allow(non_upper_case_globals)] use llvm::Struct; use abi::{self, ArgType, FnType}; use context::CrateContext; use type_::Type; fn ty_size(ty: Type) -> usize { abi::ty_size(ty, 2) } // 3.5 Structures or Unions Passed and Returned by Reference // // "Structures (including classes) and unions larger than 32 bits are passed and // returned by reference. To pass a structure or union by reference, the caller // places its address in the appropriate location: either in a register or on // the stack, according to its position in the argument list. (..)" fn classify_ret_ty(ccx: &CrateContext, ret: &mut ArgType) { if ret.ty.kind() == Struct && ty_size(ret.ty) > 32 { ret.make_indirect(ccx); } else { ret.extend_integer_width_to(16); } } fn classify_arg_ty(ccx: &CrateContext, arg: &mut ArgType) { if arg.ty.kind() == Struct && ty_size(arg.ty) > 32 { arg.make_indirect(ccx); } else { arg.extend_integer_width_to(16); } } pub fn compute_abi_info(ccx: &CrateContext, fty: &mut FnType) { if !fty.ret.is_ignore() { classify_ret_ty(ccx, &mut fty.ret); } for arg in &mut fty.args { if arg.is_ignore() { continue; } classify_arg_ty(ccx, arg); } }