* arith.c (divi): New function.

* eval.c (eval_init): divi registered as / intrinsic.

* lib.h (divi): Declared.

* txr.1: divi added to stub heading.

* txr.vim: / operator highlighted.

1 files changed, 1 insertions, 0 deletions

diff --git a/eval.c b/eval.c
index e185acb0..823a20d0 100644
--- a/eval.c
+++ b/eval.c
@@ -2182,6 +2182,7 @@ void eval_init(void)
   reg_fun(intern(lit("abs"), user_package), func_n1(abso));
   reg_fun(intern(lit("trunc"), user_package), func_n2(trunc));
   reg_fun(intern(lit("mod"), user_package), func_n2(mod));
+  reg_fun(intern(lit("/"), user_package), func_n2(divi));
   reg_fun(intern(lit("expt"), user_package), func_n0v(exptv));
   reg_fun(intern(lit("exptmod"), user_package), func_n3(exptmod));
   reg_fun(intern(lit("sqrt"), user_package), func_n1(isqrt));