- HD_SCSICMD: assume there is no sense-data buffer if no AUTOSENSE
[AROS.git] / rom / oop / setattrs.c
blobe42a452fd7e555f17e115ec4436f0bac4839c9df
1 /*
2 Copyright © 1995-2007, The AROS Development Team. All rights reserved.
3 $Id$
5 Desc: Set attributes of an object.
6 Lang: english
7 */
8 #include <exec/lists.h>
9 #include <proto/exec.h>
10 #include <aros/debug.h>
11 #include "intern.h"
12 #include <oop/static_mid.h>
14 /*****************************************************************************
16 NAME */
17 #include <proto/oop.h>
19 AROS_LH2(IPTR, OOP_SetAttrs,
21 /* SYNOPSIS */
22 AROS_LHA(OOP_Object *, object, A0),
23 AROS_LHA(struct TagItem *, attrList, A1),
25 /* LOCATION */
26 struct Library *, OOPBase, 17, OOP)
28 /* FUNCTION
29 Sets the object's attributes as specified in the
30 supplied taglist.
32 INPUTS
33 object - pointer to a object in whih we
34 want to set attributes.
36 tagList - List of attributes an their new values.
39 RESULT
40 Undefined.
42 NOTES
44 EXAMPLE
46 BUGS
48 SEE ALSO
49 OOP_DisposeObject()
51 INTERNALS
53 HISTORY
54 29-10-95 digulla automatically created from
55 intuition_lib.fd and clib/intuition_protos.h
57 *****************************************************************************/
59 AROS_LIBFUNC_INIT
61 struct pRoot_Set p;
62 struct IntOOPBase *iOOPBase = (struct IntOOPBase *)OOPBase;
64 EnterFunc(bug("OOP_SetAttrs())\n"));
65 ASSERT_VALID_PTR(object);
66 ASSERT_VALID_PTR_OR_NULL(attrList);
68 if (!iOOPBase->ob_mRoot_Set)
69 iOOPBase->ob_mRoot_Set = OOP_GetMethodID(IID_Root, moRoot_Set);
71 p.mID = iOOPBase->ob_mRoot_Set;
72 p.attrList = attrList;
74 /* Call the Set() method on the object */
75 ReturnPtr ("OOP_SetAttrs", IPTR, OOP_DoMethod(object, (OOP_Msg)&p));
77 AROS_LIBFUNC_EXIT
78 } /* OOP_SetAttrs */