src/com/stevesoft/pat/Skipped.java

   1 //\r
   2 // This software is now distributed according to\r
   3 // the Lesser Gnu Public License.  Please see\r
   4 // http://www.gnu.org/copyleft/lesser.txt for\r
   5 // the details.\r
   6 //    -- Happy Computing!\r
   7 //\r
   8 package com.stevesoft.pat;\r
   9 \r
  10 import java.util.*;\r
  11 \r
  12 /** Implements the (?&lt;number) Pattern, where number is\r
  13  an integer telling us how far to back up in the Pattern.\r
  14  Not in perl 5. */\r
  15 class Skipped\r
  16     extends Pattern\r
  17 {\r
  18   String s;\r
  19   Skipped(String s)\r
  20   {\r
  21     this.s = s;\r
  22   }\r
  23 \r
  24   public String toString()\r
  25   {\r
  26     return s + nextString();\r
  27   }\r
  28 \r
  29   public int matchInternal(int pos, Pthings pt)\r
  30   {\r
  31     //if(pt.no_check || s.regionMatches(pt.ignoreCase,0,pt.src,pos,s.length()))\r
  32     if (pt.no_check ||\r
  33         CaseMgr.regionMatches(s, pt.ignoreCase, 0, pt.src, pos, s.length()))\r
  34     {\r
  35       return nextMatch(pos + s.length(), pt);\r
  36     }\r
  37     return -1;\r
  38   }\r
  39 \r
  40   public patInt minChars()\r
  41   {\r
  42     return new patInt(s.length());\r
  43   }\r
  44 \r
  45   public patInt maxChars()\r
  46   {\r
  47     return new patInt(s.length());\r
  48   }\r
  49 \r
  50   Pattern clone1(Hashtable h)\r
  51   {\r
  52     return new Skipped(s);\r
  53   }\r
  54 };\r