1989-02-07 11:04:05 +00:00
|
|
|
/*
|
|
|
|
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
|
|
|
|
* See the copyright notice in the ACK home directory, in the file "Copyright".
|
|
|
|
*/
|
1994-06-27 08:03:14 +00:00
|
|
|
/* $Id$ */
|
1989-02-07 11:04:05 +00:00
|
|
|
/* PREPROCESSOR: INPUT SKIP FUNCTIONS */
|
|
|
|
|
2018-09-02 09:49:40 +00:00
|
|
|
#include "parameters.h"
|
|
|
|
#include "arith.h"
|
|
|
|
#include "LLlex.h"
|
|
|
|
#include "class.h"
|
|
|
|
#include "input.h"
|
1989-02-07 11:04:05 +00:00
|
|
|
|
|
|
|
|
1989-10-18 13:12:31 +00:00
|
|
|
SkipToNewLine()
|
1989-02-07 11:04:05 +00:00
|
|
|
{
|
|
|
|
register int ch;
|
1989-10-18 13:12:31 +00:00
|
|
|
register int garbage = 0;
|
1989-02-07 11:04:05 +00:00
|
|
|
|
2018-09-02 09:49:40 +00:00
|
|
|
while ((ch = GetChar()) != '\n')
|
|
|
|
{
|
1989-10-18 13:12:31 +00:00
|
|
|
if (!is_wsp(ch))
|
|
|
|
garbage = 1;
|
1989-02-07 11:04:05 +00:00
|
|
|
}
|
|
|
|
++LineNumber;
|
1989-10-18 13:12:31 +00:00
|
|
|
return garbage;
|
1989-02-07 11:04:05 +00:00
|
|
|
}
|