X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=stab.h;h=aeb7133700fe771fd02dabc739ac35bd459c65a7;hb=e929a76b14922a7077596a747fc1fcd1bdd6b9ea;hp=db2d60c36f71c4416b2d200cf291c95d75d03d8f;hpb=00bf170e31343ccc4fac7a63f6a3acf5e76c3616;p=p5sagit%2Fp5-mst-13.2.git

diff --git a/stab.h b/stab.h
index db2d60c..aeb7133 100644
--- a/stab.h
+++ b/stab.h
@@ -1,4 +1,4 @@
-/* $Header: stab.h,v 3.0.1.2 90/03/12 17:00:43 lwall Locked $
+/* $Header: stab.h,v 3.0.1.3 90/08/09 05:18:42 lwall Locked $
  *
  *    Copyright (c) 1989, Larry Wall
  *
@@ -6,6 +6,9 @@
  *    as specified in the README file that comes with the perl 3.0 kit.
  *
  * $Log:	stab.h,v $
+ * Revision 3.0.1.3  90/08/09  05:18:42  lwall
+ * patch19: Added support for linked-in C subroutines
+ * 
  * Revision 3.0.1.2  90/03/12  17:00:43  lwall
  * patch13: did some ndir straightening up for Xenix
  * 
@@ -88,6 +91,8 @@ struct stio {
 
 struct sub {
     CMD		*cmd;
+    int		(*usersub)();
+    int		userindex;
     char	*filename;
     long	depth;	/* >= 2 indicates recursive call */
     ARRAY	*tosave;