1 | static Lisp lispReplaceVars(Lisp l, Map<S, Lisp> map) { |
2 | if (l.isLeaf()) { |
3 | Lisp x = map.get(l.head); |
4 | if (x != null) ret x; |
5 | } |
6 | Lisp x = lisp(l.head); |
7 | for (Lisp a : l.args) |
8 | x.add(lispReplaceVars(a, map)); |
9 | ret x; |
10 | } |
Began life as a copy of #1005187
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: | #1007707 |
Snippet name: | lispReplaceVars |
Eternal ID of this version: | #1007707/1 |
Text MD5: | ecda63aafc18944e57db3176af478737 |
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-02 19:49:00 |
Source code size: | 240 bytes / 10 lines |
Pitched / IR pitched: | No / No |
Views / Downloads: | 491 / 507 |
Referenced in: | [show references] |