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