Ejemplo n.º 1
0
static void UT_BinaryOper2( DaoProcess *proc, DaoValue *p[], int N, int oper )
{
	DaoxUserType *C = DaoxUserType_New();
	DaoxUserType *A = (DaoxUserType*) p[0];
	DaoxUserType *B = (DaoxUserType*) p[1];
	DaoProcess_PutValue( proc, (DaoValue*) C );
}
Ejemplo n.º 2
0
static void UT_UnaryOper( DaoProcess *proc, DaoValue *p[], int N, int oper )
{
	daoint ta;
	DaoxUserType *A = (DaoxUserType*) p[0];
	DaoxUserType *C = DaoxUserType_New();
	DaoProcess_PutValue( proc, (DaoValue*) C );
}
Ejemplo n.º 3
0
DaoValue* DaoxUserType_Copy( DaoValue *self, DaoValue *target )
{
	DaoxUserType *src = (DaoxUserType*) self;
	DaoxUserType *dest = (DaoxUserType*) target;
	if( target ){
		if( src ) dest->value = src->value;
		return target;
	}
	dest = DaoxUserType_New();
	if( src ) dest->value = src->value;
	return (DaoValue*) dest;
}
Ejemplo n.º 4
0
static void UT_New1( DaoProcess *proc, DaoValue *p[], int N )
{
	DaoxUserType *self = DaoxUserType_New();
	DaoProcess_PutValue( proc, (DaoValue*) self );
	self->value = p[0]->xInteger.value;
}