diff --git a/include/xo/interpreter2/interpreter2_register_primitives.hpp b/include/xo/interpreter2/interpreter2_register_primitives.hpp
index 1946969a..5d3f0fb1 100644
--- a/include/xo/interpreter2/interpreter2_register_primitives.hpp
+++ b/include/xo/interpreter2/interpreter2_register_primitives.hpp
@@ -12,6 +12,7 @@ namespace xo {
     namespace scm {
         /** Register primitive-factories **/
         bool interpreter2_register_primitives(obj<xo::mm::AAllocator> gc,
+                                              StringTable * stbl,
                                               InstallSink sink,
                                               InstallFlags flags);
     }
diff --git a/src/interpreter2/interpreter2_register_primitives.cpp b/src/interpreter2/interpreter2_register_primitives.cpp
index 17512f4b..9b165b17 100644
--- a/src/interpreter2/interpreter2_register_primitives.cpp
+++ b/src/interpreter2/interpreter2_register_primitives.cpp
@@ -52,12 +52,11 @@ namespace xo {
 
         bool
         interpreter2_register_primitives(obj<xo::mm::AAllocator> mm,
+                                         StringTable * stbl,
                                          InstallSink sink,
                                          InstallFlags flags)
         {
-            (void)mm;
-            (void)sink;
-            (void)flags;
+            (void)stbl;
 
             scope log(XO_DEBUG(true));