svoid tok_questionDot(LS tok) {

  jreplace(tok, "if (<id> ?. <id)", "if ($3 != null && $3.$6)");

  jreplace_dyn(tok, "<id> ?.",

    func(LS tok, int i) -> S {

      S var = tok.get(i);

      bool isExpression = eqGetOneOf(tok, i-2, "ret", "return", ",", "=", "(", "?"); // too few

      if (!isExpression) {

        int j = tok_findEndOfStatement(tok, i)-1;

        tokAppend_reTok(tok, j, " }");

        ret "{ if (\*var*/ != null) \*var*/.";

      } else

        ret "\*var*/ == null ? null : \*var*/.";

    });

  /*jreplace_dyn(tok, "<id>()?.",

    func(LS tok, int i) -> S {

      int iQ = indexOf(tok, i, "?");

      S expr = joinSubList(tok, i, iQ-1);

      bool isExpression = eqGetOneOf(tok, i-2, "ret", "return", ",", "=", "(", "?"); // too few

      S var = makeVar();

      if (!isExpression) {

        int j = tok_findEndOfStatement(tok, i)-1;

        tokAppend_reTok(tok, j, " }");

        ret "{ var \ *var* / = \ *expr* /; if (\ *var* / != null) \ *var* /.";

      } else {  // experimental

        int j = tok_findEndOfExpression(tok, i)-1;

        tokAppend_reTok(tok, j, ")");

        ret "rCallF(\ *expr* /, \ *var* / -> \ *var* / == null ?: \ *var* /.";

      }

    });*/

  int iQ;

  while ((iQ = jfind(tok, "?.")) >= 0) {

    int iBeginningOfLHS = tok_findBeginningOfJavaXTerm(tok, iQ-2);

    S expr = joinSubList(tok, iBeginningOfLHS, iQ-1);

    // Are we in a statement or an expression?

    bool isExpression = eqGetOneOf(tok, iBeginningOfLHS-2, "ret", "return", ",", "=", "(", "?"); // too few

    S var = makeVar();

    if (!isExpression) {

      int j = tok_findEndOfStatement(tok, iQ+4)-1;

      tokAppend_reTok(tok, j, " }");

      tokPrepend(tok, iBeginningOfLHS, "{ var \*var*/ = ");

      replaceTokens(tok, iQ, iQ+3, "; if (\*var*/ != null) \*var*/.");

    } else {  // experimental

      int j = tok_findEndOfExpression(tok, iQ+4)-1;

      tokAppend_reTok(tok, j, ")");

      tokPrepend(tok, iBeginningOfLHS, "rCallF(");

      replaceTokens(tok, iQ, iQ+3, ", \*var*/ -> \*var*/ == null ?: \*var*/.");

    }

  }

}