/[gcl]/gcl/cmpnew/cmpenv.c
ViewVC logotype

Diff of /gcl/cmpnew/cmpenv.c

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

revision 1.2 by camm, Thu Jan 31 19:17:46 2002 UTC revision 1.3 by camm, Fri Jul 12 22:00:48 2002 UTC
# Line 254  TTL:; Line 254  TTL:;
254          V39= Cnil;          V39= Cnil;
255          V40= Cnil;          V40= Cnil;
256          {register object V41;          {register object V41;
257          register int V42;          register long V42;
258          V42= 0;          V42= 0;
259          V41= (V37);          V41= (V37);
260  T105:;  T105:;
# Line 1571  T868:; Line 1571  T868:;
1571  T869:;  T869:;
1572          {object V217= car((V216));          {object V217= car((V216));
1573          if((V217!= VV[85]))goto T874;          if((V217!= VV[85]))goto T874;
1574          {register int V218;          {register long V218;
1575          V218= fix(cadr((V216)));          V218= fix(cadr((V216)));
1576          (VV[53]->s.s_dbind)= ((V218)>=(1)?Ct:Cnil);          (VV[53]->s.s_dbind)= ((V218)>=(1)?Ct:Cnil);
1577          (VV[54]->s.s_dbind)= ((V218)>=(2)?Ct:Cnil);          (VV[54]->s.s_dbind)= ((V218)>=(2)?Ct:Cnil);
# Line 2121  static LnkT116(){ call_or_link(VV[116],& Line 2121  static LnkT116(){ call_or_link(VV[116],&
2121  static object  LnkTLI115(va_alist)va_dcl{va_list ap;va_start(ap);return(object )call_proc(VV[115],&LnkLI115,1,ap);} /* WT-DATA1 */  static object  LnkTLI115(va_alist)va_dcl{va_list ap;va_start(ap);return(object )call_proc(VV[115],&LnkLI115,1,ap);} /* WT-DATA1 */
2122  static LnkT114(){ call_or_link(VV[114],&Lnk114);} /* MAKE-STRING-OUTPUT-STREAM */  static LnkT114(){ call_or_link(VV[114],&Lnk114);} /* MAKE-STRING-OUTPUT-STREAM */
2123  static object  LnkTLI113(va_alist)va_dcl{va_list ap;va_start(ap);return(object )call_proc(VV[113],&LnkLI113,1,ap);} /* PUSH-DATA-INCF */  static object  LnkTLI113(va_alist)va_dcl{va_list ap;va_start(ap);return(object )call_proc(VV[113],&LnkLI113,1,ap);} /* PUSH-DATA-INCF */
2124    
2125    #ifdef SYSTEM_SPECIAL_INIT
2126    SYSTEM_SPECIAL_INIT
2127    #endif
2128    

Legend:
Removed from v.1.2  
changed lines
  Added in v.1.3

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