pintos-os.org Git - pspp/blob - src/language/control/control-stack.h

   1 /* PSPP - computes sample statistics.
   2    Copyright (C) 1997-9, 2000 Free Software Foundation, Inc.
   3    Written by Ben Pfaff <blp@gnu.org>.
   4
   5    This program is free software; you can redistribute it and/or
   6    modify it under the terms of the GNU General Public License as
   7    published by the Free Software Foundation; either version 2 of the
   8    License, or (at your option) any later version.
   9
  10    This program is distributed in the hope that it will be useful, but
  11    WITHOUT ANY WARRANTY; without even the implied warranty of
  12    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  13    General Public License for more details.
  14
  15    You should have received a copy of the GNU General Public License
  16    along with this program; if not, write to the Free Software
  17    Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA
  18    02110-1301, USA. */
  19
  20 #ifndef CTL_STACK_H
  21 #define CTL_STACK_H 1
  22
  23 #include <stdbool.h>
  24
  25 struct ctl_class
  26   {
  27     const char *start_name;     /* e.g. LOOP. */
  28     const char *end_name;       /* e.g. END LOOP. */
  29     void (*close) (void *);     /* Closes the control structure. */
  30   };
  31
  32 void ctl_stack_clear (void);
  33 void ctl_stack_push (const struct ctl_class *, void *private);
  34 void *ctl_stack_top (const struct ctl_class *);
  35 void *ctl_stack_search (const struct ctl_class *);
  36 void ctl_stack_pop (void *);
  37 bool ctl_stack_is_empty (void);
  38
  39 #endif /* ctl_stack.h */