mirrors/ecl
1
Fork 0
mirror of https://gitlab.com/embeddable-common-lisp/ecl.git synced 2026-01-24 05:21:20 -08:00
Code Issues Projects Releases Packages Wiki Activity

Missing break statement, caused IMAGPART to return NUL on long doubles

Browse source
This commit is contained in:
Juan Jose Garcia Ripoll 2008-07-25 16:57:11 +02:00
parent 46e3ea483e
commit 84a8e1fc80
1 changed files with 1 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

1
src/c/num_co.d
View file

@ -1338,6 +1338,7 @@ cl_imagpart(cl_object x)
#ifdef ECL_LONG_FLOAT
case t_longfloat:
x = cl_core.longfloat_zero;
break;
#endif
case t_complex:
x = x->complex.imag;