1 | static Lisp lispTranslateToJava(Lisp x, final SS map) {
|
2 | ret lispMap_after(x, func(Lisp l) {
|
3 | S s = map.get(l.head); |
4 | if (s != null) |
5 | ret lisp(s, l.args); |
6 | if (!l.isLeaf()) {
|
7 | warn("No leaf: " + l);
|
8 | ret lisp(quote(clUnparse(l))); |
9 | } |
10 | if (isInteger(l.head)) ret lisp(l.head); |
11 | else ret lisp(quote(l.head)); |
12 | }); |
13 | } |
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
| Snippet ID: | #1007861 |
| Snippet name: | lispTranslateToJava |
| Eternal ID of this version: | #1007861/5 |
| Text MD5: | 3ba75ee15c9a1766a533083f05334a7d |
| Author: | stefan |
| Category: | javax / a.i. |
| Type: | JavaX fragment (include) |
| Public (visible to everyone): | Yes |
| Archived (hidden from active list): | No |
| Created/modified: | 2017-04-12 00:44:18 |
| Source code size: | 360 bytes / 13 lines |
| Pitched / IR pitched: | No / No |
| Views / Downloads: | 483 / 482 |
| Version history: | 4 change(s) |
| Referenced in: | [show references] |