The double quote reader allows the delimiter character to change.

This commit is contained in:
jjgarcia 2005-03-21 14:00:42 +00:00
parent 8b3b57accf
commit ffab94c003

View file

@ -566,7 +566,7 @@ read_constituent(cl_object in)
static cl_object
double_quote_reader(cl_object in, cl_object c)
{
read_string('"', in);
read_string(CHAR_CODE(c), in);
@(return copy_simple_string(cl_env.token))
}