LLmessage.c 457 B

12345678910111213141516171819202122
  1. /* $Id$ */
  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. /* PARSER ERROR ADMINISTRATION */
  7. #include "LLlex.h"
  8. #include "Lpars.h"
  9. void LLmessage(int tk)
  10. {
  11. if (tk < 0)
  12. error("garbage at end of line");
  13. else if (tk) {
  14. error("%s missing", symbol2str(tk));
  15. skipline();
  16. DOT = EOF;
  17. }
  18. else
  19. error("%s deleted", symbol2str(DOT));
  20. }