1481 |
Lisp_Object string, start, end; |
Lisp_Object string, start, end; |
1482 |
{ |
{ |
1483 |
CHECK_STRING (string); |
CHECK_STRING (string); |
1484 |
return Fcons (read_internal_start (string, start, end), |
Lisp_Object ret = read_internal_start (string, start, end); |
1485 |
make_number (read_from_string_index)); |
return Fcons (ret, make_number (read_from_string_index)); |
1486 |
} |
} |
1487 |
|
|
1488 |
/* Function to set up the global context we need in toplevel read |
/* Function to set up the global context we need in toplevel read |