implement 'user-funcs'

1 files changed, 6 insertions, 0 deletions

diff --git a/neb/std/repl.py b/neb/std/repl.py
index a404cad..6b6be83 100644
--- a/neb/std/repl.py
+++ b/neb/std/repl.py
@@ -30,6 +30,12 @@ def interpretUserSymbols(symbol, args, env, ns):
 
 REPL.register("user-symbols", Builtin("user-symbols", interpretUserSymbols, [], return_type=Type(":list")))
 
+def interpretUserFuncs(symbol, args, env, ns):
+    keys = [Symbol(k, -1) for k,v in env.get_all().items() if isinstance(v, UserFunction)]
+    return List(keys)
+
+REPL.register("user-funcs", Builtin("user-funcs", interpretUserFuncs, [], return_type=Type(":list")))
+
 def interpretSyntax(symbol, args, env, ns):
     keys = [Symbol(k, -1) for k,v in sorted(env.get_all().items()) if isinstance(v, NebSyntax)]
     return List(keys)