Kilroy item page [1009795]

< > BotCompany Repo | #1009795 // Kilroy item page

JavaX module [tags: use-pretranspiled]

!7

// wrapper object!
sclass Msg {
  O o; *() {} *(O *o) {}
  
  S text() { ret castGet(o, 'text); }
}

// wrapper object!
sclass ItemPage {
  O o; *() {} *(O *o) {}
  
  S title() { ret castGet(o, 'title); }
  L<Msg> comments() { ret mapWrap(Msg, (L) get(o, 'comments)); }
  
  void addComment(S text) {
    call(creator(), 'addProgramComment, programID(), o, text);
  }
}

svoid onItemPage(ItemPage page) {
  print("Found page: " + page.title());
  for (Msg c : page.comments()) 
    print("Found comment: " + c.text());
    
  page.addComment("Kilroy was here");
}

p {
  O main = creator();
  L pages = cast call(main, 'list, 'ItemPage);
  new Matches m;
  print(n(pages, "page"));
  lock parentDBLock();
  if (nempty(pages))
    onItemPage(ItemPage(last(pages)));
}

Author comment

Began life as a copy of #1009784

Travelled to 13 computer(s): aoiabmzegqzx, bhatertpkbcr, cbybwowwnfue, cfunsshuasjs, gwrvuhgaqvyk, ishqpsrjomds, lpdgvwnxivlt, mqqgnosmbjvj, pyentgdyhuwx, pzhvpgtvlbxg, tslmcundralx, tvejysmllsmz, vouqrxazstgt

Snippet ID:

#1009795

Snippet name:

Kilroy item page

Eternal ID of this version:

#1009795/2

Text MD5:

0b49bec781c7136b65e671ebc651ad38

Transpilation MD5:

21af223fd47a6c4c613d7a06ed668d35

Author:

stefan

Category:

javax / a.i.

Type:

JavaX module

Public (visible to everyone):

Yes

Archived (hidden from active list):

Created/modified:

2017-08-17 21:56:42

Source code size:

808 bytes / 38 lines

Pitched / IR pitched:

No / No

Views / Downloads:

665 / 1533

Version history:

1 change(s)

Referenced in:

[show references]

1	!7
2
3	// wrapper object!
4	sclass Msg {
5	O o; () {} (O *o) {}
6
7	S text() { ret castGet(o, 'text); }
8	}
9
10	// wrapper object!
11	sclass ItemPage {
12	O o; () {} (O *o) {}
13
14	S title() { ret castGet(o, 'title); }
15	L<Msg> comments() { ret mapWrap(Msg, (L) get(o, 'comments)); }
16
17	void addComment(S text) {
18	call(creator(), 'addProgramComment, programID(), o, text);
19	}
20	}
21
22	svoid onItemPage(ItemPage page) {
23	print("Found page: " + page.title());
24	for (Msg c : page.comments())
25	print("Found comment: " + c.text());
26
27	page.addComment("Kilroy was here");
28	}
29
30	p {
31	O main = creator();
32	L pages = cast call(main, 'list, 'ItemPage);
33	new Matches m;
34	print(n(pages, "page"));
35	lock parentDBLock();
36	if (nempty(pages))
37	onItemPage(ItemPage(last(pages)));
38	}