1 | static Web web_keepOnlyRelationsStartingWith(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: | #1010303 |
| Snippet name: | web_keepOnlyRelationsStartingWith [doesn't clone] |
| Eternal ID of this version: | #1010303/3 |
| Text MD5: | 15ea4541f2c4692f64d1f0c13ba7c11a |
| 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 01:05:43 |
| Source code size: | 365 bytes / 12 lines |
| Pitched / IR pitched: | No / No |
| Views / Downloads: | 460 / 508 |
| Version history: | 2 change(s) |
| Referenced in: | [show references] |