ROTL
#define expand(W,i) ( W[ i & 15 ] = ROTL( 1, ( W[ i & 15 ] ^ W[ (i - 14) & 15 ] ^ \
( e += ROTL( 5, a ) + f( b, c, d ) + k + data, \
e &= 0xffffffff, b = ROTL( 30, b ) )
t = ROTL(t, i); \
w = ROTL(w, i); \
t = ROTL(t, (key[n * 2 + 1])); \
v1 = ROTL(v1, 13); \
v0 = ROTL(v0, 32); \
v3 = ROTL(v3, 16); \
v3 = ROTL(v3, 21); \
v1 = ROTL(v1, 17); \
v2 = ROTL(v2, 32); \