static Lisp lispFormatXYZ(Lisp l, Lisp... arguments) { if (l.isLeaf()) { int idx = xyzVarToIndex(l.head); if (idx > 0) { Lisp a = get(arguments, idx-1); if (a != null) ret a; } ret l; } Lisp l2 = lisp(l.head); for (Lisp a : l) l2.add(lispFormatXYZ(a, arguments)); ret l2; }
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: | #1008262 |
Snippet name: | lispFormatXYZ |
Eternal ID of this version: | #1008262/3 |
Text MD5: | 02a045f2052f619e75ca41e79237db90 |
Author: | stefan |
Category: | javax / a.i. |
Type: | JavaX fragment (include) |
Public (visible to everyone): | Yes |
Archived (hidden from active list): | No |
Created/modified: | 2017-05-04 13:45:14 |
Source code size: | 328 bytes / 14 lines |
Pitched / IR pitched: | No / No |
Views / Downloads: | 567 / 551 |
Version history: | 2 change(s) |
Referenced in: | #1006654 - Standard functions list 2 (LIVE, continuation of #761) |