perl 3.0 patch #25 patch #19, continued
[p5sagit/p5-mst-13.2.git] / regexp.h
index 286b0e1..39620da 100644 (file)
--- a/regexp.h
+++ b/regexp.h
@@ -5,16 +5,17 @@
  * not the System V one.
  */
 
-/* $Header: regexp.h,v 2.0 88/06/05 00:10:53 root Exp $
+/* $Header: regexp.h,v 3.0.1.1 90/08/09 05:12:55 lwall Locked $
  *
  * $Log:       regexp.h,v $
- * Revision 2.0  88/06/05  00:10:53  root
- * Baseline version 2.0.
+ * Revision 3.0.1.1  90/08/09  05:12:55  lwall
+ * patch19: $' broke on embedded nulls
+ * 
+ * Revision 3.0  89/10/18  15:22:46  lwall
+ * 3.0 baseline
  * 
  */
 
-#define ALIGN
-
 #define NSUBEXP  10
 
 typedef struct regexp {
@@ -26,6 +27,7 @@ typedef struct regexp {
        int regback;            /* Can regmust locate first try? */
        char *precomp;          /* pre-compilation regular expression */
        char *subbase;          /* saved string so \digit works forever */
+       char *subend;           /* end of subbase */
        char reganch;           /* Internal use only. */
        char do_folding;        /* do case-insensitive match? */
        char lastparen;         /* last paren matched */
@@ -33,7 +35,5 @@ typedef struct regexp {
        char program[1];        /* Unwarranted chumminess with compiler. */
 } regexp;
 
-extern regexp *regcomp();
-extern int regexec();
-extern void regsub();
-extern void regerror();
+regexp *regcomp();
+int regexec();