all repos — min @ ae346669b3561f0fb9779b4fa3fe99aef1fdf71f

A small but practical concatenative programming language.

Fixed xml-node typealias
h3rald h3rald@h3rald.com
Sun, 30 Jul 2023 09:50:34 +0000
commit

ae346669b3561f0fb9779b4fa3fe99aef1fdf71f

parent

1f3038be2d85cc9135045711e04745d0be6263a5

1 files changed, 2 insertions(+), 2 deletions(-)

jump to
M minpkg/lib/min_xml.nimminpkg/lib/min_xml.nim

@@ -75,7 +75,7 @@ proc xml_module*(i: In) =

let def = i.define() - i.scope.symbols["xml-node"] = MinOperator(kind: minValOp, val: xmltypes.newVal, sealed: false, quotation: false) + i.scope.symbols["typealias:xml-node"] = MinOperator(kind: minValOp, val: xmltypes.newVal, sealed: false, quotation: false) def.symbol("from-xml") do (i: In): let vals = i.expect("str")

@@ -112,7 +112,7 @@ let vals = i.expect("'sym")

i.push i.newXDict(newElement(vals[0].getString)) def.symbol("to-xml") do (i: In): - let vals = i.expect("dict:xml-node") + let vals = i.expect("xml-node") let xdict = vals[0] let xml = i.newXml(xdict) i.push ($xml).newVal