input.c 648 B

1234567891011121314151617181920212223242526272829303132333435
  1. /*
  2. * (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
  3. * See the copyright notice in the ACK home directory, in the file "Copyright".
  4. *
  5. * Author: Ceriel J.H. Jacobs
  6. */
  7. /* I N S T A N T I A T I O N O F I N P U T P A C K A G E */
  8. /* $Id$ */
  9. #include <stdlib.h>
  10. #include <stdio.h>
  11. #include <string.h>
  12. #include "f_info.h"
  13. struct f_info file_info;
  14. #include "input.h"
  15. #include <inp_pkg.body>
  16. AtEoIF()
  17. {
  18. /* Make the unstacking of input streams noticable to the
  19. lexical analyzer
  20. */
  21. if (WorkingDir[0] != '\0') free(WorkingDir);
  22. return 1;
  23. }
  24. AtEoIT()
  25. {
  26. /* Make the end of the text noticable
  27. */
  28. return 1;
  29. }