arch/m68k-amiga/potgo/freepotbits.c

   1 /*
   2     Copyright © 1995-2001, The AROS Development Team. All rights reserved.
   3     $Id$
   4
   5     Desc: FreePotBits() function.
   6     Lang: english
   7 */
   8
   9 #include <proto/potgo.h>
  10 #include <hardware/custom.h>
  11
  12 #include "potgo_intern.h"
  13
  14 AROS_LH1(void, FreePotBits,
  15          AROS_LHA(UWORD, allocated, D0),
  16          struct PotgoBase *, PotgoBase, 2, Potgo)
  17 {
  18     AROS_LIBFUNC_INIT
  19
  20         volatile struct Custom *custom = (struct Custom*)0xdff000;
  21
  22         PotgoBase->allocated &= ~allocated;
  23         PotgoBase->data &= ~allocated;
  24         custom->potgo = PotgoBase->data;
  25
  26     AROS_LIBFUNC_EXIT
  27 }