svoid tok_settableFields(LS tok) {
  int i = -1;
  while ((i = jfind(tok, i+1, "settable <id>")) >= 0) {
    int iEndOfType = tok_scanType(tok, i+2);
    S type = joinSubList_cToC(tok, i+2, iEndOfType);
    S var = identifierOrQuestionMark(get(tok, iEndOfType);
    tokReplace_reTok(tok, i, i+2, tok_formatDollarVars(
      "selfType $var($type $var) { this.$var = $var; this; } gettable ",
      +type, +var));
  }
  
  tok_gettableFields(tok);
}