static Lisp nlFromCons(Lisp term) { Lisp l = lisp("[]"); while (term.is("[]", 3) && term.get(0).is("cons", 0)) { l.add(term.get(1)); term = term.get(2); } if (!term.is("end")) l.add(term); ret l; }
Began life as a copy of #1002849
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: | #1002876 |
Snippet name: | nlFromCons |
Eternal ID of this version: | #1002876/1 |
Text MD5: | 9f7ede583eca52be526c5e88652692e9 |
Author: | stefan |
Category: | eleu / nl |
Type: | JavaX fragment (include) |
Public (visible to everyone): | Yes |
Archived (hidden from active list): | No |
Created/modified: | 2016-03-11 00:59:31 |
Source code size: | 225 bytes / 9 lines |
Pitched / IR pitched: | No / No |
Views / Downloads: | 548 / 550 |
Referenced in: | #1006654 - Standard functions list 2 (LIVE, continuation of #761) #3000382 - Answer for ferdie (>> t = 1, f = 0) #3000383 - Answer for funkoverflow (>> t=1, f=0 okay) |