1234567891011121314151617181920212223 |
- /* $Id$ */
- /*
- * (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
- * See the copyright notice in the ACK home directory, in the file "Copyright".
- */
- extern Push(); /* (token_p tkp)
- * Push the token in tkp on the fake-stack.
- */
- extern Pop(); /* (token_p tkp; offset size)
- * Pop a token of size bytes from the fake-stack
- * into tkp. If such a token is not there
- * we put a dummy in tkp and adjust the fake-stack.
- */
- extern Dup(); /* (line_p lnp)
- * Reflect the changes made by the dup-instruction
- * in lnp to the EM-stack into the fake-stack.
- */
- extern clr_stack(); /* ()
- * Clear the fake-stack.
- */
|