diff --git a/src/c/numbers/expt.d b/src/c/numbers/expt.d
index e18d86e5c..d35817df5 100644
--- a/src/c/numbers/expt.d
+++ b/src/c/numbers/expt.d
@@ -202,6 +202,12 @@ ecl_expt(cl_object x, cl_object y)
     case t_doublefloat:
     case t_singlefloat:
       return ecl_expt_float(x, y);
+#ifdef ECL_COMPLEX_FLOAT
+    case t_clfloat:
+    case t_cdfloat:
+    case t_csfloat:
+      return ecl_expt_complex_float(x, y);
+#endif
     default:
       ecl_internal_error("expt: unhandled switch branch.");
     }
diff --git a/src/tests/normal-tests/complex.lsp b/src/tests/normal-tests/complex.lsp
index d5519178d..fe716cd5f 100644
--- a/src/tests/normal-tests/complex.lsp
+++ b/src/tests/normal-tests/complex.lsp
@@ -298,5 +298,5 @@
   ;;
   ;;     (EXPT #C(1.0 0.0) 2) causes unrecoverable error.
   ;;
-  (test.csfloat.0010.issue-547
+  (test csfloat.0010.issue-547
    (finishes (expt #c(1.0 0.0) 2))))