//Value.h
const int USERVALUE_V = 1024;
const int BOOLEAN_V = [booleanid];
inline dword ValueTypeNo(const bool) {return BOOLEAN_V;}

//Value.cpp
Value::Value(bool b)           { ptr = new RichValueRep<bool>(b); }
Value::operator bool() const
{
	if(IsNull()) return false;
	return (GetType()==BOOLEAN_V)?bool(RichValue<bool>::Extract(*this)): operator int();
}

//Value.h
const int BOOLEAN_V = [booleanid];
inline dword ValueTypeNo(const bool) {return BOOLEAN_V;}
inline bool IsNumber(const Value& v)   { return v.GetType() == DOUBLE_V || v.GetType() == INT_V || \
v.GetType() == BOOL_V  || v.GetType() == INT64_V; }

//Value.cpp
Value::Value(bool b) { ptr = new RichValueRep<bool>(b);}
Value::operator int() const //same for int64, double
{
	if(IsNull()) return Null;
	return GetType() == INT_V   ? RichValue<int>::Extract(*this)
	: GetType() == INT64_V ? int(RichValue<int64>::Extract(*this))
	: GetType() == BOOL_V ? int(RichValue<bool>::Extract(*this)) 
	: int(RichValue<double>::Extract(*this));
}