#include #if CHAR_UNSIGNED #define Xchar(ch) (ch) #else #define Xchar(ch) ((ch) & 0377) #endif #if ! BYTES_REVERSED #define uget2(c) (Xchar((c)[1]) | ((unsigned) Xchar((c)[0]) << 8)) #define Xput2(i, c) (((c)[1] = (i)), ((c)[0] = (i) >> 8)) #define put2(i, c) { register int j = (i); Xput2(j, c); } #else #define uget2(c) (* ((unsigned short *) (c))) #define Xput2(i, c) (* ((short *) (c)) = (i)) #define put2(i, c) Xput2(i, c) #endif #define get2(c) ((short) uget2(c)) #if WORDS_REVERSED || ! BYTES_REVERSED #define get4(c) (uget2((c)+2) | ((long) uget2(c) << 16)) #define put4(l, c) { register long x=(l); \ Xput2((int)x,(c)+2); \ Xput2((int)(x>>16),(c)); \ } #else #define get4(c) (* ((long *) (c))) #define put4(l, c) (* ((long *) (c)) = (l)) #endif