28 lines
693 B
C
28 lines
693 B
C
/* $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 void Push(token_p tkp);
|
|
/*
|
|
* Push the token in tkp on the fake-stack.
|
|
*/
|
|
|
|
extern void 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 void Dup(line_p lnp);
|
|
/*
|
|
* Reflect the changes made by the dup-instruction
|
|
* in lnp to the EM-stack into the fake-stack.
|
|
*/
|
|
|
|
extern void clr_stack(void);
|
|
/*
|
|
* Clear the fake-stack.
|
|
*/
|