1 | static Lisp nlToCons(Lisp term) {
|
2 | if (term.isLeaf() /*|| !term.is("[]")*/)
|
3 | ret lisp("[]", "cons", term, "end");
|
4 | int n = term.size(); |
5 | Lisp x = lisp("end");
|
6 | for (int i = n-1; i >= 0; i--) |
7 | x = lisp("[]", "cons", term.get(i), x);
|
8 | ret x; |
9 | } |
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: | #1002849 |
| Snippet name: | nlToCons |
| Eternal ID of this version: | #1002849/1 |
| Text MD5: | 6cccdd6a7afe125ed553d8c7b14e37f1 |
| Author: | stefan |
| Category: | eleu / nl |
| Type: | JavaX fragment (include) |
| Public (visible to everyone): | Yes |
| Archived (hidden from active list): | No |
| Created/modified: | 2016-03-03 18:05:53 |
| Source code size: | 262 bytes / 9 lines |
| Pitched / IR pitched: | No / No |
| Views / Downloads: | 923 / 982 |
| Referenced in: | [show references] |