1f176ad6fc6d4982e92c330265b00419e93b79f27David Mosberger-Tang/* libunwind - a platform-independent unwind library 21a0af36731309401f251123d398621ce363a6e98David Mosberger-Tang Copyright (C) 2004-2005 Hewlett-Packard Co 3f176ad6fc6d4982e92c330265b00419e93b79f27David Mosberger-Tang Contributed by David Mosberger-Tang <davidm@hpl.hp.com> 4f176ad6fc6d4982e92c330265b00419e93b79f27David Mosberger-Tang 5f176ad6fc6d4982e92c330265b00419e93b79f27David Mosberger-TangThis file is part of libunwind. 6f176ad6fc6d4982e92c330265b00419e93b79f27David Mosberger-Tang 7f176ad6fc6d4982e92c330265b00419e93b79f27David Mosberger-TangPermission is hereby granted, free of charge, to any person obtaining 8f176ad6fc6d4982e92c330265b00419e93b79f27David Mosberger-Tanga copy of this software and associated documentation files (the 9f176ad6fc6d4982e92c330265b00419e93b79f27David Mosberger-Tang"Software"), to deal in the Software without restriction, including 10f176ad6fc6d4982e92c330265b00419e93b79f27David Mosberger-Tangwithout limitation the rights to use, copy, modify, merge, publish, 11f176ad6fc6d4982e92c330265b00419e93b79f27David Mosberger-Tangdistribute, sublicense, and/or sell copies of the Software, and to 12f176ad6fc6d4982e92c330265b00419e93b79f27David Mosberger-Tangpermit persons to whom the Software is furnished to do so, subject to 13f176ad6fc6d4982e92c330265b00419e93b79f27David Mosberger-Tangthe following conditions: 14f176ad6fc6d4982e92c330265b00419e93b79f27David Mosberger-Tang 15f176ad6fc6d4982e92c330265b00419e93b79f27David Mosberger-TangThe above copyright notice and this permission notice shall be 16f176ad6fc6d4982e92c330265b00419e93b79f27David Mosberger-Tangincluded in all copies or substantial portions of the Software. 17f176ad6fc6d4982e92c330265b00419e93b79f27David Mosberger-Tang 18f176ad6fc6d4982e92c330265b00419e93b79f27David Mosberger-TangTHE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, 19f176ad6fc6d4982e92c330265b00419e93b79f27David Mosberger-TangEXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF 20f176ad6fc6d4982e92c330265b00419e93b79f27David Mosberger-TangMERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND 21f176ad6fc6d4982e92c330265b00419e93b79f27David Mosberger-TangNONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE 22f176ad6fc6d4982e92c330265b00419e93b79f27David Mosberger-TangLIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION 23f176ad6fc6d4982e92c330265b00419e93b79f27David Mosberger-TangOF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION 24f176ad6fc6d4982e92c330265b00419e93b79f27David Mosberger-TangWITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE. */ 25f176ad6fc6d4982e92c330265b00419e93b79f27David Mosberger-Tang 266a89d402366d5f40eecf482197ee5f45566eed3bDavid Mosberger-Tang#include "libunwind_i.h" 27f176ad6fc6d4982e92c330265b00419e93b79f27David Mosberger-Tang 28f176ad6fc6d4982e92c330265b00419e93b79f27David Mosberger-TangPROTECTED int 29f176ad6fc6d4982e92c330265b00419e93b79f27David Mosberger-Tangunw_set_fpreg (unw_cursor_t *cursor, int regnum, unw_fpreg_t val) 30f176ad6fc6d4982e92c330265b00419e93b79f27David Mosberger-Tang{ 31f176ad6fc6d4982e92c330265b00419e93b79f27David Mosberger-Tang struct cursor *c = (struct cursor *) cursor; 32f176ad6fc6d4982e92c330265b00419e93b79f27David Mosberger-Tang 33f176ad6fc6d4982e92c330265b00419e93b79f27David Mosberger-Tang return tdep_access_fpreg (c, regnum, &val, 1); 34f176ad6fc6d4982e92c330265b00419e93b79f27David Mosberger-Tang} 35