workbench/libs/commodities/freebrokerlist.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/exec.h"
  15
  16     AROS_LH1(VOID, FreeBrokerList,
  17
  18 /*  SYNOPSIS */
  19
  20         AROS_LHA(struct List *, brokerList, A0),
  21
  22 /*  LOCATION */
  23
  24         struct Library *, CxBase, 32, Commodities)
  25
  26 /*  FUNCTION
  27
  28     Free the list of brokers obtained by calling GetBrokerList.
  29
  30     INPUTS
  31
  32     brokerList  --  List of commodity brokers (a list of struct BrokerCopy
  33                     nodes).
  34
  35     RESULT
  36
  37     NOTES
  38
  39     This function is present in AmigaOS too, but undocumented.
  40
  41     EXAMPLE
  42
  43     BUGS
  44
  45     SEE ALSO
  46
  47     INTERNALS
  48
  49     Private function.
  50
  51     HISTORY
  52
  53 ******************************************************************************/
  54
  55 {
  56     AROS_LIBFUNC_INIT
  57
  58     struct BrokerCopy *brokerCopy;
  59
  60     while ((brokerCopy = (struct BrokerCopy *)RemHead(brokerList)) != NULL)
  61     {
  62         FreeVec(brokerCopy);
  63     }
  64
  65     AROS_LIBFUNC_EXIT
  66 } /* FreeBrokerList */