DGNum/liminix
14
0
Fork 2
Code Issues 15 Pull requests 7 Projects Releases Packages Wiki Activity Actions

add assoc to anoia

Browse source
This commit is contained in:
Daniel Barlow 2024-03-04 22:25:15 +00:00
parent 095853214b
commit 9730cdd63b
1 changed files with 5 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
pkgs/anoia/init.fnl
View file

@ -1,3 +1,7 @@
(fn assoc [tbl k v]
(tset tbl k v)
tbl)
(fn merge [table1 table2] (fn merge [table1 table2]
(collect [k v (pairs table2) &into table1] (collect [k v (pairs table2) &into table1]
k v)) k v))
@ -62,4 +66,4 @@
(s:sub 1 (- (# s) pad)))) (s:sub 1 (- (# s) pad))))
{ : merge : split : file-exists? : system : hash : base64url : dup } { : assoc : merge : split : file-exists? : system : hash : base64url : dup }