[gforth] / gforth / prim  

gforth: gforth/prim

Diff for /gforth/prim between version 1.52 and 1.53

version 1.52, Wed Aug 9 20:04:06 2000 UTC version 1.53, Fri Aug 11 19:49:39 2000 UTC
Line 819 
Line 819 
  MAXU xor ;   MAXU xor ;
   
 rshift  ( u1 n -- u2 )          core    r_shift  rshift  ( u1 n -- u2 )          core    r_shift
   ""Logical shift right by @i{n} bits.""
   u2 = u1>>n;    u2 = u1>>n;
 :  :
     0 ?DO 2/ MAXI and LOOP ;      0 ?DO 2/ MAXI and LOOP ;


Generate output suitable for use with a patch program
Legend:
Removed from v.1.52  
changed lines
  Added in v.1.53

CVS Admin

Powered by ViewCVS 1.0-dev
(Powered by ViewCVS)

ViewCVS and CVS Help