svoid tok_cachedFunctions_new(LS tok) { pcall {

  int i = -1;

  while ((i = jfind(tok, i+1, "cached <id>")) >= 0) {

    Cl<S> modifiers = tok_modifiersLeftOf(tok, i);

    int iMod = tok_leftScanModifiers(tok, i);

    int bracket = indexOf(tok, "(", i);

    S fName = assertIdentifier(tok.get(bracket-2));

    int iMod2 = tok_rightScanModifiers(tok, i+2);

    printVars tok_cachedFunctions_new(+modifiers);

    modifiers.addAll(codeTokensFromSubList(tok, i+2, iMod2));

    S type = joinSubList(tok, iMod2, bracket-3);

    S boxedType = tok_toNonPrimitiveTypes(type);

    S mods = joinWithSpace(listMinus(modifiers, "final"));

    S mods2 = joinWithSpace(listMinus(modifiers, "transient"));

    printVars tok_cachedFunctions_new(+mods, +mods2);

    replaceTokens_reTok(tok, iMod, bracket-1,

      "\*mods*/ Cache<\*boxedType*/> \*fName*/_cache = new Cache<>(lambda0 \*fName*/_load);\n"

      + "\*mods2*/ \*type*/ \*fName*/() { ret \*fName*/_cache!; }\n\n"

      + "\*mods2*/ \*boxedType*/ \*fName*/_load");

  }

}}