Import of a perl5 module to trace function calls as they happen.

5 files changed, 48 insertions, 0 deletions

diff --git a/devel/p5-TraceFuncs/Makefile b/devel/p5-TraceFuncs/Makefile
new file mode 100644
index 000000000000..de0c906adad1
--- /dev/null
+++ b/devel/p5-TraceFuncs/Makefile
@@ -0,0 +1,25 @@
+# New ports collection makefile for:    p5-TraceFuncs
+# Version required:			0.1
+# Date created:				June 26th 1997
+# Whom:	      				James FitzGibbon <jfitz@FreeBSD.ORG>
+#
+#   $Id$
+#
+
+DISTNAME=	traceFunc-0.1
+PKGNAME=	p5-TraceFuncs-0.1
+CATEGORIES=	devel perl5
+MASTER_SITES=	${MASTER_SITE_PERL_CPAN}
+MASTER_SITE_SUBDIR=	Devel
+
+MAINTAINER=	jfitz@FreeBSD.ORG
+
+USE_PERL5=	YES
+
+MANPREFIX=	${PREFIX}/lib/perl5
+MAN3=		Devel::TraceFuncs.3
+
+do-configure:
+		@cd ${WRKSRC}; ${SETENV} ${CONFIGURE_ENV} ${PREFIX}/bin/perl Makefile.PL
+
+.include <bsd.port.mk>
diff --git a/devel/p5-TraceFuncs/distinfo b/devel/p5-TraceFuncs/distinfo
new file mode 100644
index 000000000000..86fd60eeab60
--- /dev/null
+++ b/devel/p5-TraceFuncs/distinfo
@@ -0,0 +1 @@
+MD5 (traceFunc-0.1.tar.gz) = 4388a9bead7160a93d23c690a7b0e229
diff --git a/devel/p5-TraceFuncs/pkg-comment b/devel/p5-TraceFuncs/pkg-comment
new file mode 100644
index 000000000000..6d243edca3bc
--- /dev/null
+++ b/devel/p5-TraceFuncs/pkg-comment
@@ -0,0 +1 @@
+a perl5 module to trace function calls as they happen.
diff --git a/devel/p5-TraceFuncs/pkg-descr b/devel/p5-TraceFuncs/pkg-descr
new file mode 100644
index 000000000000..6cf9d84ad426
--- /dev/null
+++ b/devel/p5-TraceFuncs/pkg-descr
@@ -0,0 +1,18 @@
+       Devel::TraceFuncs provides utilities to trace the
+       execution of a program.  It can print traces that look
+       something like:
+
+          +-> global: '0'
+          |  +-> main::fo(4, 5) (in ./t.pm:32): 'now then'
+          |  |  +-> main::fp(4, 5) (in ./t.pm:19)
+          |  |  |  +-> main::fq() (in ./t.pm:13)
+          |  |  |  |  que pee doll (in ./t.pm:8)
+          |  |  |  +-< main::fq() (in ./t.pm:13)
+          |  |  |  cee dee (in ./t.pm:14)
+          |  |  +-< main::fp(4, 5) (in ./t.pm:19)
+          |  |  ha
+          |  |  hs (in ./t.pm:20)
+          |  +-< main::fo(4, 5) (in ./t.pm:32): 'now then'
+          |  done (in ./t.pm:34)
+          +-< global: '0'
+
diff --git a/devel/p5-TraceFuncs/pkg-plist b/devel/p5-TraceFuncs/pkg-plist
new file mode 100644
index 000000000000..e6dd6962a342
--- /dev/null
+++ b/devel/p5-TraceFuncs/pkg-plist
@@ -0,0 +1,3 @@
+lib/perl5/man/man3/Devel::TraceFuncs.3.gz
+lib/perl5/site_perl/Devel/TraceFuncs.pm
+lib/perl5/site_perl/i386-freebsd/auto/Devel/.packlist