arch/m68k-amiga/potgo/allocpotbits.c

   1 /*
   2     Copyright © 1995-2001, The AROS Development Team. All rights reserved.
   3     $Id$
   4
   5     Desc: AllocPotBits() function.
   6     Lang: english
   7 */
   8
   9 #include <proto/potgo.h>
  10
  11 #include "potgo_intern.h"
  12
  13 AROS_LH1(UWORD, AllocPotBits,
  14          AROS_LHA(UWORD, bits, D0),
  15          struct PotgoBase *, PotgoBase, 1, Potgo)
  16 {
  17     AROS_LIBFUNC_INIT
  18
  19         bits &= ~PotgoBase->allocated;
  20         PotgoBase->allocated |= bits;
  21         // TODO! check START special cases
  22     return bits;
  23
  24     AROS_LIBFUNC_EXIT
  25 }