1500 |
} |
} |
1501 |
|
|
1502 |
static void |
static void |
1503 |
siLsharp_comma_reader_for_compiler() |
FFN(siLsharp_comma_reader_for_compiler)() |
1504 |
{ |
{ |
1505 |
check_arg(3); |
check_arg(3); |
1506 |
if(vs_base[2] != Cnil && !READsuppress) |
if(vs_base[2] != Cnil && !READsuppress) |
2341 |
@(return `copy_readtable(from, to)`) |
@(return `copy_readtable(from, to)`) |
2342 |
@) |
@) |
2343 |
|
|
2344 |
void |
LFD(Lreadtablep)() |
|
Lreadtablep() |
|
2345 |
{ |
{ |
2346 |
check_arg(1); |
check_arg(1); |
2347 |
|
|
2489 |
return(x); |
return(x); |
2490 |
} |
} |
2491 |
|
|
2492 |
void |
LFD(siLstring_to_object)() |
|
siLstring_to_object() |
|
2493 |
{ |
{ |
2494 |
check_arg(1); |
check_arg(1); |
2495 |
|
|
2499 |
|
|
2500 |
|
|
2501 |
static void |
static void |
2502 |
siLstandard_readtable() |
FFN(siLstandard_readtable)() |
2503 |
{ |
{ |
2504 |
check_arg(0); |
check_arg(0); |
2505 |
|
|