diff --git a/include/xo/numeric/numeric_register_primitives.hpp b/include/xo/numeric/numeric_register_primitives.hpp index 18a594be..c4b0bd7b 100644 --- a/include/xo/numeric/numeric_register_primitives.hpp +++ b/include/xo/numeric/numeric_register_primitives.hpp @@ -12,6 +12,7 @@ namespace xo { namespace scm { /** Register primitive factories with primitive registry **/ bool numeric_register_primitives(obj mm, + StringTable * stbl, InstallSink sink, InstallFlags flags); } diff --git a/src/numeric/numeric_register_primitives.cpp b/src/numeric/numeric_register_primitives.cpp index b2da4d9e..aa4a24d0 100644 --- a/src/numeric/numeric_register_primitives.cpp +++ b/src/numeric/numeric_register_primitives.cpp @@ -49,8 +49,11 @@ namespace xo { } bool - numeric_register_primitives(obj mm, InstallSink sink, InstallFlags flags) + numeric_register_primitives(obj mm, StringTable * stbl, + InstallSink sink, InstallFlags flags) { + (void)stbl; + scope log(XO_DEBUG(true)); bool ok = true;