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

Diff of /gcl/lsp/mislib.c

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

revision 1.9 by camm, Sun Feb 9 22:35:15 2003 UTC revision 1.10 by camm, Wed Feb 26 22:21:36 2003 UTC
# Line 25  static object LI2(V3) Line 25  static object LI2(V3)
25    
26  object V3;  object V3;
27  {        VMB2 VMS2 VMV2  {        VMB2 VMS2 VMV2
28  goto TTL;          goto TTL;
29  TTL:;  TTL:;
30          base[0]= (V3);          base[0]= (V3);
31          base[1]= small_fixnum(4);          base[1]= small_fixnum(4);
# Line 68  static object LI3(V11) Line 68  static object LI3(V11)
68    
69  object V11;  object V11;
70  {        VMB3 VMS3 VMV3  {        VMB3 VMS3 VMV3
71  goto TTL;          goto TTL;
72  TTL:;  TTL:;
73          {object V12;          {object V12;
74          V12= one_minus((V11));          V12= one_minus((V11));
# Line 468  static void L7() Line 468  static void L7()
468          check_arg(1);          check_arg(1);
469          V62=(base[0]);          V62=(base[0]);
470          vs_top=sup;          vs_top=sup;
471  goto TTL;          goto TTL;
472  TTL:;  TTL:;
473          base[1]= VV[14];          base[1]= VV[14];
474          base[2]= (V62);          base[2]= (V62);

Legend:
Removed from v.1.9  
changed lines
  Added in v.1.10

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