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

Diff of /gcl/cmpnew/cmpif.c

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

revision 1.5 by camm, Fri Aug 2 22:23:58 2002 UTC revision 1.6 by camm, Mon Aug 5 20:36:08 2002 UTC
# Line 1534  T673:; Line 1534  T673:;
1534          princ_str("\n   FEerror(\"The ECASE key value ~s is illegal.\",1,V",VV[16]);          princ_str("\n   FEerror(\"The ECASE key value ~s is illegal.\",1,V",VV[16]);
1535          (void)((*(LnkLI54))((V202)));          (void)((*(LnkLI54))((V202)));
1536          princ_str(");",VV[16]);          princ_str(");",VV[16]);
1537          base[3]= cdr(car((V200)));          (void)((VFUN_NARGS=2,(*(LnkLI60))(Cnil,VV[17])));
         vs_top=(vs_base=base+3)+1;  
         (void) (*Lnk55)();  
         vs_top=sup;  
1538          goto T828;          goto T828;
1539  goto T830;  goto T830;
1540  T830:;  T830:;

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

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