new functor for attributed variables.

This commit is contained in:
Vitor Santos Costa 2010-03-06 22:34:49 +00:00
parent fa517450ee
commit 9083dc5633

View File

@ -44,13 +44,15 @@
typedef enum typedef enum
{ {
db_ref_e = sizeof (Functor *), db_ref_e = sizeof (Functor *),
long_int_e = 2 * sizeof (Functor *), attvar_e = 2*sizeof (Functor *),
big_int_e = 3 * sizeof (Functor *), long_int_e = 3 * sizeof (Functor *),
double_e = 4 * sizeof (Functor *) big_int_e = 4 * sizeof (Functor *),
double_e = 5 * sizeof (Functor *)
} }
blob_type; blob_type;
#define FunctorDBRef ((Functor)(db_ref_e)) #define FunctorDBRef ((Functor)(db_ref_e))
#define FunctorAttVar ((Functor)(attvar_e))
#define FunctorLongInt ((Functor)(long_int_e)) #define FunctorLongInt ((Functor)(long_int_e))
#define FunctorBigInt ((Functor)(big_int_e)) #define FunctorBigInt ((Functor)(big_int_e))
#define FunctorDouble ((Functor)(double_e)) #define FunctorDouble ((Functor)(double_e))