/[gcl]/gcl/o/read.d
ViewVC logotype

Diff of /gcl/o/read.d

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.14.4.1.2.2.2.3 by camm, Thu Oct 23 16:41:44 2003 UTC revision 1.14.4.1.2.2.2.4 by camm, Thu Nov 6 16:16:53 2003 UTC
# Line 1500  Lsharp_comma_reader() Line 1500  Lsharp_comma_reader()
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)
# Line 2341  object strm,eof; Line 2341  object strm,eof;
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    
# Line 2490  object x; Line 2489  object x;
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    
# Line 2501  siLstring_to_object() Line 2499  siLstring_to_object()
2499    
2500    
2501  static void  static void
2502  siLstandard_readtable()  FFN(siLstandard_readtable)()
2503  {  {
2504          check_arg(0);          check_arg(0);
2505    

Legend:
Removed from v.1.14.4.1.2.2.2.3  
changed lines
  Added in v.1.14.4.1.2.2.2.4

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26