1 | static Web web_dropRelationsStartingWith(Web web, S prefix) { |
2 | for (WebRelation rel : values(web.relations)) { |
3 | new L<Lisp> labels; |
4 | for (Lisp l : rel.labels) |
5 | if (!swic(web.unparseLabel(l), prefix)) |
6 | labels.add(l); |
7 | if (l(labels) < l(rel.labels)) |
8 | web_setLabels(rel, labels); |
9 | } |
10 | web_dropEmptyRelations(web); |
11 | ret web; |
12 | } |
Began life as a copy of #1010300
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: | #1010312 |
Snippet name: | web_dropRelationsStartingWith [changes original] |
Eternal ID of this version: | #1010312/1 |
Text MD5: | 1723ccc24e78cab0a63360f69eaad58d |
Author: | stefan |
Category: | javax / a.i. |
Type: | JavaX fragment (include) |
Public (visible to everyone): | Yes |
Archived (hidden from active list): | No |
Created/modified: | 2017-09-11 02:17:48 |
Source code size: | 362 bytes / 12 lines |
Pitched / IR pitched: | No / No |
Views / Downloads: | 508 / 528 |
Referenced in: | [show references] |