1 /* Copyright (c) 2007-2015. The SimGrid Team.
2 * All rights reserved. */
4 /* This program is free software; you can redistribute it and/or modify it
5 * under the terms of the license (GNU LGPL) which comes with this package. */
9 #include <xbt/sysdep.h>
11 #include "src/mc/Frame.hpp"
16 void* Frame::frame_base(unw_cursor_t& unw_cursor) const
18 simgrid::dwarf::Location location = simgrid::dwarf::resolve(
19 frame_base_location, object_info,
20 &unw_cursor, nullptr, nullptr, -1);
21 if (location.in_memory())
22 return location.address();
23 else if (location.in_register()) {
24 // This is a special case.
25 // The register if not the location of the frame base
26 // (a frame base cannot be located in a register)
27 // Instead, DWARF defines this to mean that the register
28 // contains the address of the frame base.
30 unw_get_reg(&unw_cursor, location.register_id(), &word);
33 else xbt_die("Unexpected location type");