SCM_COMPLEX_REAL  143 src/hash.c                 hashval = (unsigned long)((SCM_COMPLEX_REAL(obj)+SCM_COMPLEX_IMAG(obj))*2654435761UL);
SCM_COMPLEX_REAL  291 src/number.c           double r = SCM_COMPLEX_REAL(z);
SCM_COMPLEX_REAL  307 src/number.c           double r = SCM_COMPLEX_REAL(z);
SCM_COMPLEX_REAL  704 src/number.c           double r = SCM_COMPLEX_REAL(obj);
SCM_COMPLEX_REAL  753 src/number.c           obj = Scm_MakeComplex(-SCM_COMPLEX_REAL(obj),
SCM_COMPLEX_REAL  773 src/number.c           double r = SCM_COMPLEX_REAL(obj), r1;
SCM_COMPLEX_REAL  951 src/number.c           result_real = SCM_COMPLEX_REAL(arg0);
SCM_COMPLEX_REAL  962 src/number.c                   result_real += SCM_COMPLEX_REAL(arg1);
SCM_COMPLEX_REAL 1051 src/number.c           result_real = SCM_COMPLEX_REAL(arg0);
SCM_COMPLEX_REAL 1062 src/number.c                   result_real -= SCM_COMPLEX_REAL(arg1);
SCM_COMPLEX_REAL 1154 src/number.c           result_real = SCM_COMPLEX_REAL(arg0);
SCM_COMPLEX_REAL 1169 src/number.c                   double r = SCM_COMPLEX_REAL(arg1);
SCM_COMPLEX_REAL 1274 src/number.c           result_real = SCM_COMPLEX_REAL(arg0);
SCM_COMPLEX_REAL 1286 src/number.c                   div_real = SCM_COMPLEX_REAL(arg1);
SCM_COMPLEX_REAL 1594 src/number.c               return ((SCM_COMPLEX_REAL(arg0) == SCM_COMPLEX_REAL(arg1))
SCM_COMPLEX_REAL 2136 src/number.c           double_print(buf, FLT_BUF, SCM_COMPLEX_REAL(obj), FALSE);
SCM_COMPLEX_REAL  373 src/stdlib.c     SCM_RESULT = (SCM_COMPLEX_REAL(obj) == 0.0
SCM_COMPLEX_REAL 1125 src/stdlib.c     } else { SCM_RETURN(Scm_Values2(Scm_MakeFlonum(SCM_COMPLEX_REAL(z)), Scm_MakeFlonum(SCM_COMPLEX_IMAG(z))));}
SCM_COMPLEX_REAL 1143 src/stdlib.c      SCM_RETURN(Scm_MakeFlonum(SCM_COMPLEX_REAL(z)));