1 files changed, 1 insertions, 0 deletions
diff --git a/eval.c b/eval.c
index 1c8664be..3aeeefda 100644
--- a/eval.c
+++ b/eval.c
@@ -2371,6 +2371,7 @@ void eval_init(void)
   reg_fun(intern(lit("tok-str"), user_package), func_n3o(tok_str, 1));
   reg_fun(intern(lit("list-str"), user_package), func_n1(list_str));
   reg_fun(intern(lit("trim-str"), user_package), func_n1(trim_str));
+  reg_fun(intern(lit("string-cmp"), user_package), func_n2(string_cmp));
   reg_fun(intern(lit("string-lt"), user_package), func_n2(string_lt));
   reg_fun(intern(lit("int-str"), user_package), func_n2o(int_str, 1));
   reg_fun(intern(lit("flo-str"), user_package), func_n1(flo_str));