/[gcl]/gcl/lsp/packlib.c
ViewVC logotype

Diff of /gcl/lsp/packlib.c

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

revision 1.4 by camm, Sat Jul 20 07:10:55 2002 UTC revision 1.5 by camm, Fri Aug 2 22:23:58 2002 UTC
# Line 318  TTL:; Line 318  TTL:;
318          {register object V68;          {register object V68;
319          register object V69;          register object V69;
320          register object V70;          register object V70;
321          V71 = make_fixnum(length((V67)));          V71 = make_fixnum((long)length((V67)));
322          V72 = make_fixnum(length((V66)));          V72 = make_fixnum((long)length((V66)));
323          V68= number_minus(V71,V72);          V68= number_minus(V71,V72);
324          V69= make_fixnum(length((V66)));          V69= make_fixnum((long)length((V66)));
325          V70= small_fixnum(0);          V70= small_fixnum(0);
326  goto T49;  goto T49;
327  T49:;  T49:;
# Line 1141  T261:; Line 1141  T261:;
1141          base[0]=base[0];          base[0]=base[0];
1142          return Cnil;}          return Cnil;}
1143          }          }
1144  static object  LnkTLI34(va_alist)va_dcl{va_list ap;va_start(ap);return(object )call_proc(VV[34],(void **)&LnkLI34,1,ap);} /* PRINT-SYMBOL-APROPOS */  static object  LnkTLI34(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_proc(VV[34],(void **)&LnkLI34,1,ap);va_end(ap);return V1;} /* PRINT-SYMBOL-APROPOS */
1145  static object  LnkTLI33(va_alist)va_dcl{va_list ap;va_start(ap);return(object )call_proc(VV[33],(void **)&LnkLI33,2,ap);} /* SUBSTRINGP */  static object  LnkTLI33(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_proc(VV[33],(void **)&LnkLI33,2,ap);va_end(ap);return V1;} /* SUBSTRINGP */
1146  static void LnkT10(){ call_or_link(VV[10],(void **)&Lnk10);} /* PACKAGE-SIZE */  static void LnkT10(){ call_or_link(VV[10],(void **)&Lnk10);} /* PACKAGE-SIZE */
1147  static void LnkT32(){ call_or_link(VV[32],(void **)&Lnk32);} /* FIND-DECLARATIONS */  static void LnkT32(){ call_or_link(VV[32],(void **)&Lnk32);} /* FIND-DECLARATIONS */
1148    

Legend:
Removed from v.1.4  
changed lines
  Added in v.1.5

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