/[gcl]/gcl/o/fat_string.c
ViewVC logotype

Diff of /gcl/o/fat_string.c

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

revision 1.7 by camm, Sat Jul 20 12:41:20 2002 UTC revision 1.8 by camm, Wed Jul 24 19:05:53 2002 UTC
# Line 4  Line 4 
4    
5  #include <stdlib.h>  #include <stdlib.h>
6  #include <unistd.h>  #include <unistd.h>
7    #include <string.h>
8    
9  #include "include.h"  #include "include.h"
10  #include "page.h"  #include "page.h"
# Line 69  char *data_load_addr =0; Line 70  char *data_load_addr =0;
70    
71    
72  #ifdef SPECIAL_RSYM  #ifdef SPECIAL_RSYM
73    void
74  read_special_symbols(symfile)  read_special_symbols(symfile)
75  char *symfile;  char *symfile;
76  {FILE *symin;  {FILE *symin;
# Line 100  char *symfile; Line 101  char *symfile;
101       (SYM_ADDRESS(c_table,i))=jj;       (SYM_ADDRESS(c_table,i))=jj;
102       SYM_STRING(c_table,i)=symbols;       SYM_STRING(c_table,i)=symbols;
103    
104       while( *(symbols++) =   getc(symin))       while((*(symbols++) =   getc(symin)))
105         {;}         {;}
106  /*     dprintf( name %s ,  SYM_STRING(c_table,i));  /*     dprintf( name %s ,  SYM_STRING(c_table,i));
107       dprintf( addr %d , jj);       dprintf( addr %d , jj);
# Line 116  char *symfile; Line 117  char *symfile;
117   if (symin) fclose(symin);   if (symin) fclose(symin);
118  }  }
119    
120  node_compare(node1,node2)  int
121  char *node1, *node2;  node_compare(const void *node1,const void *node2)
122  { return(strcmp( ((struct node *)node1)->string,  { return(strcmp( ((struct node *)node1)->string,
123                   ((struct node *)node2)->string));}                   ((struct node *)node2)->string));}
124    

Legend:
Removed from v.1.7  
changed lines
  Added in v.1.8

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