lib: new function vm-fun-p.

* eval.c (eval_init): vm-fun-p intrinsic registered.

* lib.c (vm_fun_p): New function.

* lib.h (vm_fun_p): Declared.

1 files changed, 1 insertions, 0 deletions

diff --git a/lib.h b/lib.h
index 5a818086..b485caed 100644
--- a/lib.h
+++ b/lib.h
@@ -901,6 +901,7 @@ val func_get_env(val fun);
 val func_set_env(val fun, val env);
 val functionp(val);
 val interp_fun_p(val);
+val vm_fun_p(val);
 val generic_funcall(val fun, struct args *);
 val funcall(val fun);
 val funcall1(val fun, val arg);