Sorry, my home internet connection is broken, so I couldn't post the fix to what my optimizations broke in treeparse. The break is from this function: (def parse-list (parsers li)
(when (and li (alist li) (alist (car li)))
(iflet (parsed remaining actions) (seq-r parsers (car li)
(tconc-new) (tconc-new)) ;this one
(unless remaining (return (list parsed)
(cdr li) actions)))))
It should be: (def parse-list (parsers li)
(when (and li (alist li) (alist (car li)))
(iflet (parsed remaining actions) (seq-r parsers (car li)
(tconc-new) nil) ;this one
(unless remaining (return (list parsed)
(cdr li) actions)))))
Let me know if you find any more brokenness ^^I won't be able to post anything to Arkani for a while, since as I said our home internet connection is broken ;.; T.T Among other things I won't be able to share: the beginnings of an Arc code formatter (given Arc code in string form, create html with formats and most especially docstring-in-title-attributes) and the beginnings of a Markdown formatter. T.T |