1 /* $Id: ml_raw.h,v 1.3 1999-04-14 14:05:52 garrigue Exp $ */
7 #define Kind_raw(raw) (Field(raw,0))
8 #define Base_raw(raw) (Field(raw,1))
9 #define Offset_raw(raw) (Field(raw,2))
10 #define Size_raw(raw) (Field(raw,3))
11 #define Static_raw(raw) (Field(raw,4))
13 #define Addr_raw(raw) (Base_raw(raw)+Long_val(Offset_raw(raw)))
15 #define Void_raw(raw) ((void *) Addr_raw(raw))
16 #define Byte_raw(raw) ((char *) Addr_raw(raw))
17 #define Short_raw(raw) ((short *) Addr_raw(raw))
18 #define Int_raw(raw) ((int *) Addr_raw(raw))
19 #define Long_raw(raw) ((long *) Addr_raw(raw))
20 #define Float_raw(raw) ((float *) Addr_raw(raw))
21 #define Double_raw(raw) ((double *) Addr_raw(raw))