artemist/mes
1
0
Fork 0
Code Issues Pull requests Packages Projects Releases Wiki Activity

core: reader_eat_whitespace: Prepare for M2-Planet.

Browse source 
* src/reader.c (reader_eat_whitespace): Prepare for M2-Planet.
This commit is contained in:
Jan (janneke) Nieuwenhuizen 2020-07-16 21:37:41 +02:00
parent 9cbf29b70a
commit bd816cf29b
No known key found for this signature in database
GPG key ID: F3C1A0D9C1D65273
1 changed files with 8 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

12
src/reader.c
View file

@ -162,11 +162,15 @@ reader_eat_whitespace (int c)
c = readchar ();
if (c == ';')
return reader_eat_whitespace (reader_read_line_comment (c));
if (c == '#' && (peekchar () == '!' || peekchar () == '|'))
if (c == '#')
{
c = readchar ();
reader_read_block_comment (c, readchar ());
return reader_eat_whitespace (readchar ());
int p = peekchar ();
if (p == '!' || p == '|')
{
c = readchar ();
reader_read_block_comment (c, readchar ());
return reader_eat_whitespace (readchar ());
}
}
return c;
}