< > BotCompany Repo | #1002849 // nlToCons

JavaX fragment (include)

static Lisp nlToCons(Lisp term) {
  if (term.isLeaf() /*|| !term.is("[]")*/)
    ret lisp("[]", "cons", term, "end");
  int n = term.size();
  Lisp x = lisp("end");
  for (int i = n-1; i >= 0; i--)
    x = lisp("[]", "cons", term.get(i), x);
  ret x;
}

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