/* fundamental_type : tags and macros */
#define MLTAG_INVALID	Val_int(991669975)
#define MLTAG_NONE	Val_int(868932280)
#define MLTAG_INTERFACE	Val_int(892510617)
#define MLTAG_CHAR	Val_int(746596054)
#define MLTAG_UCHAR	Val_int(495941035)
#define MLTAG_BOOLEAN	Val_int(-36520312)
#define MLTAG_INT	Val_int(3647695)
#define MLTAG_UINT	Val_int(946260890)
#define MLTAG_LONG	Val_int(846753148)
#define MLTAG_ULONG	Val_int(596098129)
#define MLTAG_INT64	Val_int(1007610317)
#define MLTAG_UINT64	Val_int(946115928)
#define MLTAG_ENUM	Val_int(769078017)
#define MLTAG_FLAGS	Val_int(8020775)
#define MLTAG_FLOAT	Val_int(8715644)
#define MLTAG_DOUBLE	Val_int(-447883503)
#define MLTAG_STRING	Val_int(-1011690287)
#define MLTAG_POINTER	Val_int(-789212003)
#define MLTAG_BOXED	Val_int(887957258)
#define MLTAG_PARAM	Val_int(994293869)
#define MLTAG_OBJECT	Val_int(-943576385)

extern lookup_info ml_table_fundamental_type[];
#define Val_fundamental_type(data) ml_lookup_from_c (ml_table_fundamental_type, data)
#define Fundamental_type_val(key) ml_lookup_to_c (ml_table_fundamental_type, key)

/* data : tags and macros */
#define MLTAG_CAML	Val_int(746250621)
#define MLTAG_BOOL	Val_int(735857706)
#define MLTAG_INT32	Val_int(1007609646)
