[Scsh-checkins] CVS: scx/c/xlib type.c,1.9,1.10

[David Frese <frese@users.sourceforge.net>]

Update of /cvsroot/scsh/scx/c/xlib
In directory usw-pr-cvs1:/tmp/cvs-serv24887

Modified Files:
        type.c 
Log Message:
fixed Bit_To_Symbol and Bits_To_Symbols.


Index: type.c
===================================================================
RCS file: /cvsroot/scsh/scx/c/xlib/type.c,v
retrieving revision 1.9
retrieving revision 1.10
diff -C2 -r1.9 -r1.10
*** type.c      2001/07/19 15:31:12     1.9
--- type.c      2001/07/30 14:18:32     1.10
***************
*** 28,32 ****
    s48_value res = S48_NULL;
    char* name;
!   int val;
    int i = 0;
    
--- 28,32 ----
    s48_value res = S48_NULL;
    char* name;
!   unsigned long val;
    int i = 0;
    
***************
*** 63,67 ****
    char* sym = s48_extract_symbol(Sym);
    int i;
!   for (i=0; table[i].val != 0 ;i++) {
      if (strcmp(sym, table[i].name) == 0) {
        return table[i].val;
--- 63,67 ----
    char* sym = s48_extract_symbol(Sym);
    int i;
!   for (i=0; table[i].name != (char*)0; i++) {
      if (strcmp(sym, table[i].name) == 0) {
        return table[i].val;