aboutsummaryrefslogtreecommitdiff
path: root/ell.c
diff options
context:
space:
mode:
Diffstat (limited to 'ell.c')
-rw-r--r--ell.c5
1 files changed, 5 insertions, 0 deletions
diff --git a/ell.c b/ell.c
index da3fb72..850083c 100644
--- a/ell.c
+++ b/ell.c
@@ -977,6 +977,10 @@ defn (fn_list) {
return check (ctx, (*result = new_list (values)));
}
+defn (fn_values) {
+ return !args || check (ctx, (*result = new_clone_list (args)));
+}
+
defn (fn_if) {
struct item *cond, *body, *keyword;
for (cond = args; ; cond = keyword->next) {
@@ -1280,6 +1284,7 @@ static bool
init_runtime_library (struct context *ctx) {
if (!native_register (ctx, "set", fn_set)
|| !native_register (ctx, "list", fn_list)
+ || !native_register (ctx, "values", fn_values)
|| !native_register (ctx, "if", fn_if)
|| !native_register (ctx, "map", fn_map)
|| !native_register (ctx, "print", fn_print)