< > BotCompany Repo | #1002742 // snlQuestionMarksToBack - and other punctuation

JavaX fragment (include)

static Lisp snlQuestionMarksToBack(Lisp tree) {
  if (tree == null || tree.size() == 0) ret tree;

  if (tree.isA("<") && tree.get(0).is("?", "."))
    ret lisp("* " + tree.get(0).head,
      snlQuestionMarksToBack(tree.get(1)));

  // recurse
  Lisp lisp = new Lisp(tree.head);
  for (Lisp child : tree)
    lisp.add(snlQuestionMarksToBack(child));
  ret lisp;
}

Author comment

Began life as a copy of #1002740

download  show line numbers  debug dex  old transpilations   

Travelled to 13 computer(s): aoiabmzegqzx, bhatertpkbcr, cbybwowwnfue, cfunsshuasjs, gwrvuhgaqvyk, ishqpsrjomds, lpdgvwnxivlt, mqqgnosmbjvj, pyentgdyhuwx, pzhvpgtvlbxg, tslmcundralx, tvejysmllsmz, vouqrxazstgt

No comments. add comment