diff --git a/src/h/external.h b/src/h/external.h
index 011cdf8a5..ef94d26cd 100755
--- a/src/h/external.h
+++ b/src/h/external.h
@@ -1140,6 +1140,8 @@ extern ECL_API cl_object ecl_make_long_float(long double f);
 extern ECL_API cl_object   ecl_make_csfloat(float _Complex x);
 extern ECL_API cl_object   ecl_make_cdfloat(double _Complex x);
 extern ECL_API cl_object   ecl_make_clfloat(long double _Complex x);
+extern ECL_API cl_object   si_complex_float_p(cl_object o);
+extern ECL_API cl_object   si_complex_float(cl_object r, cl_object i);
 extern ECL_API float       _Complex ecl_to_csfloat(cl_object x);
 extern ECL_API double      _Complex ecl_to_cdfloat(cl_object x);
 extern ECL_API long double _Complex ecl_to_clfloat(cl_object x);
diff --git a/src/h/internal.h b/src/h/internal.h
index cd31ff1cf..38872bffb 100755
--- a/src/h/internal.h
+++ b/src/h/internal.h
@@ -312,10 +312,6 @@ extern cl_object _ecl_library_default_entry(void);
 extern cl_object _ecl_double_to_integer(double d);
 extern cl_object _ecl_float_to_integer(float d);
 extern cl_object _ecl_long_double_to_integer(long double d);
-#ifdef ECL_COMPLEX_FLOAT
-extern cl_object si_complex_float_p(cl_object o);
-extern cl_object si_complex_float(cl_object r, cl_object i);
-#endif
 
 /* main.d */