From b1522f7551ad6f1a989770b144109ea90bd0d99b Mon Sep 17 00:00:00 2001
From: lecoanet
Date: Fri, 24 Sep 2004 12:53:11 +0000
Subject: *** empty log message ***

---
 buildperl.tcl | 40 ++++++++++++++++++++++++++++++++++++++++
 1 file changed, 40 insertions(+)
 create mode 100644 buildperl.tcl

(limited to 'buildperl.tcl')

diff --git a/buildperl.tcl b/buildperl.tcl
new file mode 100644
index 0000000..3b01864
--- /dev/null
+++ b/buildperl.tcl
@@ -0,0 +1,40 @@
+#
+# This script is intended to be run in the top directory
+# with: tclsh84 buildperl.tcl
+#
+
+#
+# Create a perl build directory and copy the relevant
+# files in it.
+#
+set wd [pwd]
+set files {t Zinc.xs Zinc.pm Makefile.PL demos README Zinc}
+set buildDir buildperl
+
+puts "Creating temporary build structure for Tkzinc perl variant"
+
+if { [file exists $buildDir] } {
+    file delete -force $buildDir
+}
+file mkdir $buildDir
+foreach f $files {
+    file copy -force Perl/$f $buildDir
+}
+foreach f [glob -nocomplain libtess/*.c libtess/*.h generic/*.c generic/*.h win/*.c debian/changelog debian/copyright] {
+    file copy -force $f $buildDir
+}
+
+puts "Compiling the perl variant"
+
+set make make
+if { [lindex $tcl_platform(os) 0] eq "Windows" } {
+    set make nmake
+}
+
+cd buildperl
+catch {exec perl Makefile.PL} result
+puts $result
+catch {exec $make} result
+puts $result
+
+cd $wd
-- 
cgit v1.1