1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
|
#!/bin/sh
# \
exec tclsh "$0" "$@"
########################################################################
## This should typically be called via `make install', but you can of
## course run it by hand if you supply all necessary parameters as
## obvious from the makefile.
########################################################################
## trivial command line parser, understands BLA=blubs and sets
## env(BLA) to blubs.
foreach assign $argv {
if {[regexp {([^=]+)=(.*)} $assign dummy key value]} {
set env($key) $value
}
}
########################################################################
##
## Create destination directories
##
file mkdir $env(BINDIR)
file mkdir $env(MAN1DIR)
file mkdir p $env(MANnDIR)
foreach dir {c tcl tcllib} {
file mkdir [file join $env(LIBDIR) $dir]
}
file mkdir $env(DOCDIR)
##
## copy all files to their destination
##
# the executables
foreach exe {clig cligUsage} {
set dst [file join $env(BINDIR) $exe]
file copy -force $exe.fixed $dst
file attributes $dst -permissions 0755
}
# pkgIndex
file copy -force pkgIndex.tcl [file join $env(LIBDIR)]
# files sourced by the executable
eval file copy -force [glob tcl/*.tcl] tcl/cmdline.cli \
[file join $env(LIBDIR) tcl]
# C-language template files
eval file copy -force [glob c/*.c c/*.man] [file join $env(LIBDIR) c]
# the tcl-package ::clig
eval file copy -force [glob tcllib/*.tcl] [file join $env(LIBDIR) tcllib]
# the manual
foreach t {1 n} {
set suffix $env(M${t}SUFFIX)
set files $env(M${t}FILES)
set dir $env(MAN${t}DIR)
foreach f $files {
set dst [file join $dir [file root [file tail $f]]].$suffix
file copy -force $f $dst
}
}
# doc and examples
file copy -force CHANGES ANNOUNCE index.html README WISHLIST \
COPYING-2.0 LICENSE example \
$env(DOCDIR)
########################################################################
## Local Variables: ##
## mode:tcl ##
## End: ##
|
