// Note: the variable names must match the record field names
// as we still need a way to find the field names from here
static void tok_ifRecordMatch(LS tok) {
  int i;
  while ((i = jfind_check is(tok, "if <id> is <id>(")) >= 0) {
    int iOpening = indexOf(tok, i, "(");  
    int iClosing = indexOf(tok, iOpening+2, ")");
    S var = tok.get(i+2), className = tok.get(i+6);
    S cast = "((" + className + ") " + var + ")";
    int start = iClosing+2;
    tok_statementToBlock(tok, start);
    int end = findEndOfStatement(tok, start);
    StringBuilder statement = new("if (\*var*/ instanceof \*className*/");
    new StringBuilder decls;
    LPairS vars = tok_typesAndNamesOfParams(subList(tok, iOpening+1, iClosing));
    for (PairS v : vars) {
      S type = v.a, name = v.b;
      S nonPrim = tok_toNonPrimitiveTypes(type);
      if (!tok_typeIsObject(type))
        statement.append(" && \*cast*/.\*name*/ instanceof \*nonPrim*/");
      decls.append("\n\*type*/ \*name*/ = cast \*cast*/.\*name*/;");
    }
    replaceTokens_reTok(tok, i, start+1, statement + ") {" + decls);
  }
}

Began life as a copy of #1017552