< > BotCompany Repo | #1007861 // lispTranslateToJava

JavaX fragment (include)

static Lisp lispTranslateToJava(Lisp x, final SS map) {
  ret lispMap_after(x, func(Lisp l) {
    S s = map.get(l.head);
    if (s != null)
      ret lisp(s, l.args);
    if (!l.isLeaf()) {
      warn("No leaf: " + l);
      ret lisp(quote(clUnparse(l)));
    }
    if (isInteger(l.head)) ret lisp(l.head);
    else ret lisp(quote(l.head));
  });
}

Author comment

Began life as a copy of #1007860

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