コード例 #1
0
  public static boolean parseAmbiguousSigil(PsiBuilder b, int l, IElementType sigilTokenType) {
    IElementType tokenType = b.getTokenType();
    if (tokenType == sigilTokenType) {
      if (PerlParserDefinition.WHITE_SPACE_AND_COMMENTS.contains(b.rawLookup(1))
          && b.lookAhead(1) != LEFT_BRACE) // space disallowed after * or % if it's not a cast
      return false;

      b.advanceLexer();
      return true;
    }

    return false;
  }
コード例 #2
0
  /**
   * Return token ahead of current, skips spaces and comments
   *
   * @param steps positive or negative steps number to get token
   * @return token data: type and text
   */
  public PerlTokenData lookupToken(int steps) {
    assert steps != 0;
    int rawStep = 0;
    int step = steps / Math.abs(steps);

    IElementType rawTokenType = null;

    while (steps != 0) {
      rawStep += step;
      rawTokenType = rawLookup(rawStep);

      // reached end
      if (rawTokenType == null) return null;

      if (!PerlParserDefinition.WHITE_SPACE_AND_COMMENTS.contains(rawTokenType)) steps -= step;
    }

    // fixme crushes on quick s typing
    return new PerlTokenData(
        rawTokenType,
        getOriginalText()
            .subSequence(rawTokenTypeStart(rawStep), rawTokenTypeStart(rawStep + 1))
            .toString());
  }