From 3a3c8930adfebb5078c7862b59a6864c074f0655 Mon Sep 17 00:00:00 2001
From: mryouse
Date: Fri, 15 Jul 2022 22:28:57 +0000
Subject: implement prepend

---
 neb/std/lists.py | 8 ++++++++
 1 file changed, 8 insertions(+)

(limited to 'neb')

diff --git a/neb/std/lists.py b/neb/std/lists.py
index 1ecbb6d..a49962b 100644
--- a/neb/std/lists.py
+++ b/neb/std/lists.py
@@ -130,3 +130,11 @@ def interpretSortNumbers(symbol, args, env, ns):
     return List(out)
 
 LISTS.register("sort-numbers", Builtin("sort-numbers", interpretSortNumbers, [Arg("list", TypeEnum.LIST)], return_type=Type(":list")))
+
+def interpretPrepend(symbol, args, env, ns):
+    lst = args[0]
+    val = args[1]
+    items = lst.args[:]
+    return List([val] + items)
+
+LISTS.register("prepend", Builtin("prepend", interpretPrepend, [Arg("list", TypeEnum.LIST), Arg("item", TypeEnum.ANY)], return_type=Type(":list")))
-- 
cgit v1.2.3