[gforth] / gforth / engine / support.c  

gforth: gforth/engine/support.c

Diff for /gforth/engine/support.c between version 1.8 and 1.9

version 1.8, Sat Aug 30 19:55:13 2003 UTC version 1.9, Sat Jun 19 18:47:26 2004 UTC
Line 399 
Line 399 
     f_y = (Float *)(((Address)f_y)+nstridey);      f_y = (Float *)(((Address)f_y)+nstridey);
   }    }
 }  }
   
   UCell lshift(UCell u1, UCell n)
   {
     return u1 << n;
   }
   
   UCell rshift(UCell u1, UCell n)
   {
     return u1 >> n;
   }

Generate output suitable for use with a patch program
Legend:
Removed from v.1.8  
changed lines
  Added in v.1.9
CVS Admin

Powered by ViewCVS 1.0-dev 		(Powered by ViewCVS)

ViewCVS and CVS Help