Fix VM compile error

db4
Slava Pestov 2009-02-06 04:53:08 -06:00
parent 4e422afb92
commit f9bc9a3198
1 changed files with 4 additions and 4 deletions

View File

@ -530,8 +530,8 @@ void box_double(double flo)
void primitive_from_rect(void)
{
F_COMPLEX* complex = allot_object(COMPLEX_TYPE,sizeof(F_COMPLEX));
complex->imaginary = dpop();
complex->real = dpop();
dpush(RETAG(complex,COMPLEX_TYPE));
F_COMPLEX* z = allot_object(COMPLEX_TYPE,sizeof(F_COMPLEX));
z->imaginary = dpop();
z->real = dpop();
dpush(RETAG(z,COMPLEX_TYPE));
}