1 | // doesn't perform any sanity checks... |
2 | // and this is NL-level, not SNL. |
3 | static Lisp snlJoinOps(L<Lisp> ops) {
|
4 | Lisp t = lisp("[]");
|
5 | for (Lisp op : ops) {
|
6 | int i = op.head.indexOf(' ');
|
7 | t.add(lisp(substring(op.head, 0, i))); |
8 | t.add(op.get(0)); |
9 | } |
10 | ret t; |
11 | } |
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: | #1002866 |
| Snippet name: | snlJoinOps - opposite of snlSplitOps |
| Eternal ID of this version: | #1002866/1 |
| Text MD5: | 480141e0199c6d3763a3ed61a44fbf04 |
| Author: | stefan |
| Category: | eleu / nl / prolog |
| Type: | JavaX fragment (include) |
| Public (visible to everyone): | Yes |
| Archived (hidden from active list): | No |
| Created/modified: | 2016-03-09 19:51:07 |
| Source code size: | 282 bytes / 11 lines |
| Pitched / IR pitched: | No / No |
| Views / Downloads: | 821 / 942 |
| Referenced in: | [show references] |