distrib/sources/beh/beh/beh_frebepor.c

   1
   2 /* ###--------------------------------------------------------------### */
   3 /*                                                                      */
   4 /* file         : beh_frebepor.c                                        */
   5 /* date         : Sep  3 1993                                           */
   6 /* version      : v106                                                  */
   7 /* authors      : Pirouz BAZARGAN SABET                                 */
   8 /* content      : low-level function                                    */
   9 /*                                                                      */
  10 /* ###--------------------------------------------------------------### */
  11
  12 #include <stdio.h>
  13 #include MUT_H
  14 #include LOG_H
  15 #include BEH_H
  16
  17 /* ###--------------------------------------------------------------### */
  18 /* function     : beh_frebepor                                          */
  19 /* description  : delete a list of BEAUX structures and all objects     */
  20 /*                pointed by any os BEAUXs in the list                  */
  21 /* called func. : mbkfree                                               */
  22 /* ###--------------------------------------------------------------### */
  23
  24 void beh_frebepor (listbepor)
  25
  26 struct bepor *listbepor;        /* list of bepor to be deleted          */
  27
  28   {
  29   struct bepor *ptbepor;
  30
  31         /* ###------------------------------------------------------### */
  32         /*    for each object of the list, delete the object itself     */
  33         /* ###------------------------------------------------------### */
  34
  35   while (listbepor != NULL)
  36     {
  37     ptbepor   = listbepor;
  38     listbepor = listbepor->NEXT;
  39     mbkfree (ptbepor);
  40     }
  41
  42   }