diff --git a/src/reader2/DProgressSsm.cpp b/src/reader2/DProgressSsm.cpp
index eafe88b8..dd201b65 100644
--- a/src/reader2/DProgressSsm.cpp
+++ b/src/reader2/DProgressSsm.cpp
@@ -1253,7 +1253,7 @@ namespace xo {
             case optype::op_multiply:
                 {
                     auto pm_obj  = (with_facet<AGCObject>::mkobj
-                                    (&Primitives::s_mul_gco_gco_pm));
+                                    (&NumericPrimitives::s_mul_gco_gco_pm));
                     auto fn_expr = (DConstant::make
                                     (p_psm->expr_alloc(), pm_obj));