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

mes: Allow tick as part of identifier.

Browse source 
* src/reader.c (reader_read_sexp_): Do not treat tick as special.
This commit is contained in:
Jan Nieuwenhuizen 2018-04-07 13:36:23 +02:00
parent cd0e3f8ba5
commit c4b0879bc9
1 changed files with 3 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
src/reader.c
View file

@ -61,9 +61,6 @@ reader_read_sexp_ (int c, SCM s, SCM a)
return reader_read_sexp_ ('\n', s, a);
case '\t':
return reader_read_sexp_ ('\n', s, a);
case '\'':
return cons (cell_symbol_quote,
cons (reader_read_sexp_ (getchar (), s, a), cell_nil));
case ';':
reader_read_line_comment (c);
return reader_read_sexp_ ('\n', s, a);
@ -94,6 +91,9 @@ reader_read_sexp_ (int c, SCM s, SCM a)
case ')':
ungetchar (c);
return cell_nil;
case '\'':
return cons (cell_symbol_quote,
cons (reader_read_sexp_ (getchar (), s, a), cell_nil));
case '"':
return reader_read_string ();
}