workbench/libs/commodities/setcxobjpri.c

   1 /*
   2     Copyright © 1995-2001, The AROS Development Team. All rights reserved.
   3     $Id$
   4
   5     Desc:
   6     Lang: English
   7 */
   8
   9 /*****************************************************************************
  10
  11     NAME */
  12
  13 #include "cxintern.h"
  14 #include <proto/commodities.h>
  15
  16
  17 AROS_LH2I(LONG, SetCxObjPri,
  18
  19 /*  SYNOPSIS */
  20
  21         AROS_LHA(CxObj *, co,  A0),
  22         AROS_LHA(LONG,    pri, D0),
  23
  24 /*  LOCATION */
  25
  26         struct Library *, CxBase, 13, Commodities)
  27
  28 /*  FUNCTION
  29
  30     Set the priority of the commodity object 'co'.
  31
  32     INPUTS
  33
  34     co   --  the commodity object the priority of which to change (may be
  35              NULL)
  36     pri  --  the new priority to give the object (priorities range from
  37              -128 to 127, a value of 0 is normal)
  38
  39     RESULT
  40
  41     The old priority, that is the priority of the object prior to this
  42     operation.
  43
  44     NOTES
  45
  46     EXAMPLE
  47
  48     BUGS
  49
  50     When using this function, the object is NOT repositioned according to
  51     the priority given. To achive this, remove the object from the commodity
  52     hierarchy using RemoveCxObj(), use SetCxPri() and reinsert it with
  53     EnqueueCxObj().
  54
  55     SEE ALSO
  56
  57     EnqueueCxObj()
  58
  59     INTERNALS
  60
  61     HISTORY
  62
  63 ******************************************************************************/
  64
  65 {
  66     AROS_LIBFUNC_INIT
  67
  68     UBYTE oldPri;
  69
  70     if (co == NULL)
  71     {
  72         return 0;
  73     }
  74
  75     oldPri = co->co_Node.ln_Pri;
  76     co->co_Node.ln_Pri = pri;
  77
  78     return oldPri;
  79
  80     AROS_LIBFUNC_EXIT
  81 } /* SetCxObjPri */
  82