public
/
to-edn
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Add support for symbols.

This commit is contained in:
niten 2022-05-30 15:42:27 -07:00
parent 815750e93e
commit d9f744ac19
1 changed files with 5 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
to-edn.nix
View File

@ -2,10 +2,14 @@
with lib; with lib;
let let
isSymbol = str: isNull (match "^'.+" str);
stripQuote = head (match "^'(.+)");
parseStr = str: if (isSymbol str) then (stripQuote str) else ''"${str}"'';
join-str = concatStringsSep " "; join-str = concatStringsSep " ";
toEDN = ds: toEDN = ds:
if isString ds then if isString ds then
''"${ds}"'' parseStr ds
else else
(if isInt ds then (if isInt ds then
ds ds