util/ego/cs/cs_stack.h

   1 /* $Id: cs_stack.h,v 1.4 1994/06/24 10:22:49 ceriel Exp $ */
   2 /*
   3  * (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
   4  * See the copyright notice in the ACK home directory, in the file "Copyright".
   5  */
   6 extern  Push();         /* (token_p tkp)
   7                          * Push the token in tkp on the fake-stack.
   8                          */
   9
  10 extern  Pop();          /* (token_p tkp; offset size)
  11                          * Pop a token of size bytes from the fake-stack
  12                          * into tkp. If such a token is not there
  13                          * we put a dummy in tkp and adjust the fake-stack.
  14                          */
  15
  16 extern  Dup();          /* (line_p lnp)
  17                          * Reflect the changes made by the dup-instruction
  18                          * in lnp to the EM-stack into the fake-stack.
  19                          */
  20
  21 extern  clr_stack();    /* ()
  22                          * Clear the fake-stack.
  23                          */