info-table ( alist -- html )


Vocabulary
spider.report

Inputs
alistan object


Outputs
htmlan object


Definition


: info-table ( alist -- html )
[
first2 dupd 1000000 /f 3 nenum T{ xml-chunk
{ seq
V{
""
T{ tag
{ name ~name~ }
{ children ~vector~ }
}
""
}
}
} interpolate-xml
] map 1 nenum T{ xml-chunk
{ seq
V{
""
T{ tag
{ name ~name~ }
{ attrs ~attrs~ }
{ children ~vector~ }
}
""
}
}
} interpolate-xml ;