tok_transpileGetSet - "get/set" [old version with late evaluation of argument] [1031587]

< > BotCompany Repo | #1031587 // tok_transpileGetSet - "get/set" [old version with late evaluation of argument]

JavaX fragment (include)

svoid tok_transpileGetSet(LS tok) {
  for (int i : jfindAll_reverse(tok, "get/set <id>(")) {
    S field = tok.get(i+6);
    int iOpening = i+8;
    int iClosing = tok_findEndOfBracketPart(tok, iOpening)-1;
    S expr = tok_join(tok, iOpening+1, iClosing);
    S var = makeVar(), var2 = makeVar();
    tokReplace_reTok(tok, i, iClosing+1,
      replaceDollarVars("iSetAndGet($var -> { var \*var2*/ = $expr; $var2?.$field = $var; }, " +
        "() -> { var \*var2*/ = $expr; ret $var2?.$field; })",
        +var, +var2, +expr, +field);
  }
}

Author comment

Began life as a copy of #1031580

Travelled to 4 computer(s): bhatertpkbcr, mqqgnosmbjvj, pyentgdyhuwx, vouqrxazstgt

Snippet ID:

#1031587

Snippet name:

tok_transpileGetSet - "get/set" [old version with late evaluation of argument]

Eternal ID of this version:

#1031587/1

Text MD5:

2d444720055d9cab7b612bc36e880a22

Author:

stefan

Category:

javax

Type:

JavaX fragment (include)

Public (visible to everyone):

Yes

Archived (hidden from active list):

Created/modified:

2021-06-22 06:53:43

Source code size:

553 bytes / 13 lines

Pitched / IR pitched:

No / No

Views / Downloads:

93 / 108

Referenced in:

[show references]

1	svoid tok_transpileGetSet(LS tok) {
2	for (int i : jfindAll_reverse(tok, "get/set <id>(")) {
3	S field = tok.get(i+6);
4	int iOpening = i+8;
5	int iClosing = tok_findEndOfBracketPart(tok, iOpening)-1;
6	S expr = tok_join(tok, iOpening+1, iClosing);
7	S var = makeVar(), var2 = makeVar();
8	tokReplace_reTok(tok, i, iClosing+1,
9	replaceDollarVars("iSetAndGet($var -> { var \var2/ = $expr; $var2?.$field = $var; }, " +
10	"() -> { var \var2/ = $expr; ret $var2?.$field; })",
11	+var, +var2, +expr, +field);
12	}
13	}