New unchecked setter for function environment.

* lib.c (us_func_set_env): New function: func_set_env without
the type check.

* lib.h (us_func_set_env): Declared.

1 files changed, 1 insertions, 0 deletions

diff --git a/lib.h b/lib.h
index 6b8c0b0a..c9b6198f 100644
--- a/lib.h
+++ b/lib.h
@@ -948,6 +948,7 @@ val copy_fun(val ofun);
 val func_get_form(val fun);
 val func_get_env(val fun);
 val func_set_env(val fun, val env);
+val us_func_set_env(val fun, val env);
 val functionp(val);
 val interp_fun_p(val);
 val vm_fun_p(val);