perl 1.0 patch 5: a2p didn't make use of the config.h generated by Configure

The a2p program used index() and bcopy(), both of do not exist
everywhere.  Since Configure was already figuring out about those
functions, it is fairly trivial to get a2p to make use of the info.

diff --git a/patchlevel.h b/patchlevel.h
index 82d4f62..51d80f3 100644 (file)
--- a/patchlevel.h
+++ b/patchlevel.h
@@ -1 +1 @@
-#define PATCHLEVEL 4
+#define PATCHLEVEL 5

diff --git a/x2p/a2p.h b/x2p/a2p.h
index 35f8bbe..eede53d 100644 (file)
--- a/x2p/a2p.h
+++ b/x2p/a2p.h
@@ -1,11 +1,22 @@
-/* $Header: a2p.h,v 1.0 87/12/18 13:06:58 root Exp $
+/* $Header: a2p.h,v 1.0.1.1 88/01/26 09:52:30 root Exp $
  *
  * $Log:       a2p.h,v $
+ * Revision 1.0.1.1  88/01/26  09:52:30  root
+ * patch 5: a2p didn't use config.h.
+ * 
  * Revision 1.0  87/12/18  13:06:58  root
  * Initial revision
  * 
  */
 
+#define VOIDUSED 1
+#include "../config.h"
+
+#ifndef BCOPY
+#   define bcopy(s1,s2,l) memcpy(s2,s1,l);
+#   define bzero(s,l) memset(s,0,l);
+#endif
+
 #include "handy.h"
 #define Nullop 0