Class: Complex::compatible

Inherits:
Object show all
Defined in:
complex.c

Instance Method Summary collapse

Instance Method Details

#marshal_load(a) ⇒ Object (private)

:nodoc:



1516
1517
1518
1519
1520
1521
1522
1523
1524
1525
# File 'complex.c', line 1516

static VALUE
nucomp_marshal_load(VALUE self, VALUE a)
{
    Check_Type(a, T_ARRAY);
    if (RARRAY_LEN(a) != 2)
	rb_raise(rb_eArgError, "marshaled complex must have an array whose length is 2 but %ld", RARRAY_LEN(a));
    rb_ivar_set(self, id_i_real, RARRAY_AREF(a, 0));
    rb_ivar_set(self, id_i_imag, RARRAY_AREF(a, 1));
    return self;
}