Hex Artifact Content

Artifact 4e8a270142ff9f6298c1610293933312f0372ea4:


0000: 23 21 20 2f 62 69 6e 2f 62 61 73 68 0a 0a 69 66  #! /bin/bash..if
0010: 20 5b 20 21 20 2d 66 20 27 62 75 69 6c 64 2e 73   [ ! -f 'build.s
0020: 68 27 20 5d 3b 20 74 68 65 6e 0a 09 65 63 68 6f  h' ]; then..echo
0030: 20 27 45 52 52 4f 52 3a 20 54 68 69 73 20 73 63   'ERROR: This sc
0040: 72 69 70 74 20 6d 75 73 74 20 62 65 20 72 75 6e  ript must be run
0050: 20 66 72 6f 6d 20 74 68 65 20 64 69 72 65 63 74   from the direct
0060: 6f 72 79 20 69 74 20 69 73 20 69 6e 27 20 3e 26  ory it is in' >&
0070: 32 0a 0a 09 65 78 69 74 20 31 0a 66 69 0a 69 66  2...exit 1.fi.if
0080: 20 5b 20 2d 7a 20 22 24 7b 54 43 4c 56 45 52 53   [ -z "${TCLVERS
0090: 7d 22 20 5d 3b 20 74 68 65 6e 0a 09 65 63 68 6f  }" ]; then..echo
00a0: 20 27 45 52 52 4f 52 3a 20 54 68 65 20 54 43 4c   'ERROR: The TCL
00b0: 56 45 52 53 20 65 6e 76 69 72 6f 6e 6d 65 6e 74  VERS environment
00c0: 20 76 61 72 69 61 62 6c 65 20 69 73 20 6e 6f 74   variable is not
00d0: 20 73 65 74 27 20 3e 26 32 0a 0a 09 65 78 69 74   set' >&2...exit
00e0: 20 31 0a 66 69 0a 0a 4b 49 54 44 4c 4c 56 45 52   1.fi..KITDLLVER
00f0: 53 3d 22 30 2e 30 22 0a 42 55 49 4c 44 44 49 52  S="0.0".BUILDDIR
0100: 3d 22 24 28 70 77 64 29 2f 62 75 69 6c 64 2f 6b  ="$(pwd)/build/k
0110: 69 74 64 6c 6c 2d 24 7b 4b 49 54 44 4c 4c 56 45  itdll-${KITDLLVE
0120: 52 53 7d 22 0a 4f 55 54 44 49 52 3d 22 24 28 70  RS}".OUTDIR="$(p
0130: 77 64 29 2f 6f 75 74 22 0a 49 4e 53 54 44 49 52  wd)/out".INSTDIR
0140: 3d 22 24 28 70 77 64 29 2f 69 6e 73 74 22 0a 4f  ="$(pwd)/inst".O
0150: 54 48 45 52 50 4b 47 53 44 49 52 3d 22 24 28 70  THERPKGSDIR="$(p
0160: 77 64 29 2f 2e 2e 2f 22 0a 65 78 70 6f 72 74 20  wd)/../".export 
0170: 4b 49 54 44 4c 4c 56 45 52 53 20 42 55 49 4c 44  KITDLLVERS BUILD
0180: 44 49 52 20 4f 55 54 44 49 52 20 49 4e 53 54 44  DIR OUTDIR INSTD
0190: 49 52 20 4f 54 48 45 52 50 4b 47 53 44 49 52 0a  IR OTHERPKGSDIR.
01a0: 0a 72 6d 20 2d 72 66 20 27 62 75 69 6c 64 27 20  .rm -rf 'build' 
01b0: 27 6f 75 74 27 20 27 69 6e 73 74 27 0a 6d 6b 64  'out' 'inst'.mkd
01c0: 69 72 20 27 6f 75 74 27 20 27 69 6e 73 74 27 20  ir 'out' 'inst' 
01d0: 7c 7c 20 65 78 69 74 20 31 0a 0a 28 0a 09 63 70  || exit 1..(..cp
01e0: 20 2d 72 20 27 62 75 69 6c 64 73 72 63 27 20 27   -r 'buildsrc' '
01f0: 62 75 69 6c 64 27 0a 09 63 64 20 22 24 7b 42 55  build'..cd "${BU
0200: 49 4c 44 44 49 52 7d 22 20 7c 7c 20 65 78 69 74  ILDDIR}" || exit
0210: 20 31 0a 0a 09 23 20 46 69 78 20 75 70 20 61 72   1...# Fix up ar
0220: 63 68 69 76 65 73 20 74 68 61 74 20 54 63 6c 20  chives that Tcl 
0230: 67 65 74 73 20 77 72 6f 6e 67 0a 09 66 6f 72 20  gets wrong..for 
0240: 61 72 63 68 69 76 65 20 69 6e 20 2e 2e 2f 2e 2e  archive in ../..
0250: 2f 2e 2e 2f 74 63 6c 2f 69 6e 73 74 2f 6c 69 62  /../tcl/inst/lib
0260: 2f 64 64 65 2a 2f 74 63 6c 64 64 65 2a 2e 61 20  /dde*/tcldde*.a 
0270: 2e 2e 2f 2e 2e 2f 2e 2e 2f 74 63 6c 2f 69 6e 73  ../../../tcl/ins
0280: 74 2f 6c 69 62 2f 72 65 67 2a 2f 74 63 6c 72 65  t/lib/reg*/tclre
0290: 67 2a 2e 61 3b 20 64 6f 0a 09 09 69 66 20 5b 20  g*.a; do...if [ 
02a0: 21 20 2d 66 20 22 24 7b 61 72 63 68 69 76 65 7d  ! -f "${archive}
02b0: 22 20 5d 3b 20 74 68 65 6e 0a 09 09 09 63 6f 6e  " ]; then....con
02c0: 74 69 6e 75 65 0a 09 09 66 69 0a 0a 09 09 72 6d  tinue...fi....rm
02d0: 20 2d 72 66 20 5f 5f 54 45 4d 50 5f 5f 0a 09 09   -rf __TEMP__...
02e0: 28 0a 09 09 09 6d 6b 64 69 72 20 5f 5f 54 45 4d  (....mkdir __TEM
02f0: 50 5f 5f 20 7c 7c 20 65 78 69 74 20 31 0a 09 09  P__ || exit 1...
0300: 09 63 64 20 5f 5f 54 45 4d 50 5f 5f 0a 0a 09 09  .cd __TEMP__....
0310: 09 23 23 20 50 61 74 63 68 20 61 72 63 68 69 76  .## Patch archiv
0320: 65 20 6e 61 6d 65 0a 09 09 09 61 72 63 68 69 76  e name....archiv
0330: 65 3d 22 2e 2e 2f 24 7b 61 72 63 68 69 76 65 7d  e="../${archive}
0340: 22 0a 0a 09 09 09 22 24 7b 41 52 3a 2d 61 72 7d  "....."${AR:-ar}
0350: 22 20 78 20 22 24 7b 61 72 63 68 69 76 65 7d 22  " x "${archive}"
0360: 20 7c 7c 20 65 78 69 74 20 31 0a 0a 09 09 09 72   || exit 1.....r
0370: 6d 20 2d 66 20 22 24 7b 61 72 63 68 69 76 65 7d  m -f "${archive}
0380: 22 0a 0a 09 09 09 22 24 7b 41 52 3a 2d 61 72 7d  "....."${AR:-ar}
0390: 22 20 63 72 20 22 24 7b 61 72 63 68 69 76 65 7d  " cr "${archive}
03a0: 22 20 2a 2e 6f 20 7c 7c 20 65 78 69 74 20 31 0a  " *.o || exit 1.
03b0: 09 09 09 22 24 7b 52 41 4e 4c 49 42 3a 2d 72 61  ..."${RANLIB:-ra
03c0: 6e 6c 69 62 7d 22 20 22 24 7b 61 72 63 68 69 76  nlib}" "${archiv
03d0: 65 7d 22 20 7c 7c 20 74 72 75 65 0a 09 09 29 0a  e}" || true...).
03e0: 09 64 6f 6e 65 0a 0a 09 23 20 44 65 74 65 72 6d  .done...# Determ
03f0: 69 6e 65 20 68 6f 77 20 77 65 20 69 6e 76 6f 6b  ine how we invok
0400: 65 20 61 20 54 63 6c 20 69 6e 74 65 72 70 72 65  e a Tcl interpre
0410: 74 65 72 0a 09 66 6f 72 20 74 65 73 74 73 68 20  ter..for testsh 
0420: 69 6e 20 22 24 7b 54 43 4c 53 48 5f 4e 41 54 49  in "${TCLSH_NATI
0430: 56 45 3a 2d 66 61 6c 73 65 7d 22 20 74 63 6c 73  VE:-false}" tcls
0440: 68 20 74 63 6c 73 68 38 2e 34 20 74 63 6c 73 68  h tclsh8.4 tclsh
0450: 38 2e 35 20 74 63 6c 73 68 38 2e 36 20 22 24 7b  8.5 tclsh8.6 "${
0460: 54 43 4c 4b 49 54 3a 2d 74 63 6c 6b 69 74 7d 22  TCLKIT:-tclkit}"
0470: 3b 20 64 6f 0a 09 09 69 66 20 65 63 68 6f 20 27  ; do...if echo '
0480: 65 78 69 74 20 30 27 20 7c 20 22 24 7b 74 65 73  exit 0' | "${tes
0490: 74 73 68 7d 22 20 3e 2f 64 65 76 2f 6e 75 6c 6c  tsh}" >/dev/null
04a0: 20 32 3e 2f 64 65 76 2f 6e 75 6c 6c 3b 20 74 68   2>/dev/null; th
04b0: 65 6e 0a 09 09 09 54 43 4c 53 48 5f 4e 41 54 49  en....TCLSH_NATI
04c0: 56 45 3d 22 24 7b 74 65 73 74 73 68 7d 22 0a 0a  VE="${testsh}"..
04d0: 09 09 09 62 72 65 61 6b 0a 09 09 66 69 0a 09 64  ...break...fi..d
04e0: 6f 6e 65 0a 0a 09 23 20 43 6c 65 61 6e 75 70 2c  one...# Cleanup,
04f0: 20 6a 75 73 74 20 69 6e 63 61 73 65 20 74 68 65   just incase the
0500: 20 69 6e 63 6f 6d 69 6e 67 20 64 69 72 65 63 74   incoming direct
0510: 6f 72 79 20 77 61 73 20 6e 6f 74 20 70 72 65 2d  ory was not pre-
0520: 63 6c 65 61 6e 65 64 0a 09 24 7b 4d 41 4b 45 3a  cleaned..${MAKE:
0530: 2d 6d 61 6b 65 7d 20 64 69 73 74 63 6c 65 61 6e  -make} distclean
0540: 20 3e 2f 64 65 76 2f 6e 75 6c 6c 20 32 3e 2f 64   >/dev/null 2>/d
0550: 65 76 2f 6e 75 6c 6c 0a 09 72 6d 20 2d 72 66 20  ev/null..rm -rf 
0560: 22 73 74 61 72 70 61 63 6b 2e 76 66 73 22 0a 0a  "starpack.vfs"..
0570: 09 23 20 43 72 65 61 74 65 20 56 46 53 20 64 69  .# Create VFS di
0580: 72 65 63 74 6f 72 79 0a 09 6d 6b 64 69 72 20 22  rectory..mkdir "
0590: 73 74 61 72 70 61 63 6b 2e 76 66 73 22 0a 09 6d  starpack.vfs"..m
05a0: 6b 64 69 72 20 22 73 74 61 72 70 61 63 6b 2e 76  kdir "starpack.v
05b0: 66 73 2f 6c 69 62 22 0a 0a 09 23 23 20 43 6f 70  fs/lib"...## Cop
05c0: 79 20 69 6e 20 72 65 71 75 69 72 65 64 20 62 75  y in required bu
05d0: 69 6c 74 20 64 69 72 65 63 74 6f 72 69 65 73 0a  ilt directories.
05e0: 09 63 70 20 2d 72 20 22 24 7b 4f 54 48 45 52 50  .cp -r "${OTHERP
05f0: 4b 47 53 44 49 52 7d 22 2f 2a 2f 6f 75 74 2f 2a  KGSDIR}"/*/out/*
0600: 20 27 73 74 61 72 70 61 63 6b 2e 76 66 73 2f 27   'starpack.vfs/'
0610: 0a 0a 09 23 23 20 52 65 6e 61 6d 65 20 74 68 65  ...## Rename the
0620: 20 22 76 66 73 22 20 70 61 63 6b 61 67 65 20 64   "vfs" package d
0630: 69 72 65 63 74 6f 72 79 20 74 6f 20 77 68 61 74  irectory to what
0640: 20 22 62 6f 6f 74 2e 74 63 6c 22 20 65 78 70 65   "boot.tcl" expe
0650: 63 74 73 0a 09 6d 76 20 27 73 74 61 72 70 61 63  cts..mv 'starpac
0660: 6b 2e 76 66 73 2f 6c 69 62 27 2f 76 66 73 2a 20  k.vfs/lib'/vfs* 
0670: 27 73 74 61 72 70 61 63 6b 2e 76 66 73 2f 6c 69  'starpack.vfs/li
0680: 62 2f 76 66 73 27 0a 0a 09 23 23 20 49 6e 73 74  b/vfs'...## Inst
0690: 61 6c 6c 20 22 62 6f 6f 74 2e 74 63 6c 22 0a 09  all "boot.tcl"..
06a0: 63 70 20 27 62 6f 6f 74 2e 74 63 6c 27 20 27 73  cp 'boot.tcl' 's
06b0: 74 61 72 70 61 63 6b 2e 76 66 73 2f 27 0a 0a 09  tarpack.vfs/'...
06c0: 23 20 49 6e 63 6c 75 64 65 20 65 78 74 72 61 20  # Include extra 
06d0: 6f 62 6a 65 63 74 73 20 61 73 20 72 65 71 75 69  objects as requi
06e0: 72 65 64 0a 09 23 23 20 49 6e 69 74 69 61 6c 69  red..## Initiali
06f0: 7a 65 20 6c 69 73 74 20 6f 66 20 65 78 74 72 61  ze list of extra
0700: 20 6f 62 6a 65 63 74 73 0a 09 45 58 54 52 41 5f   objects..EXTRA_
0710: 4f 42 4a 53 3d 22 22 0a 0a 09 23 23 20 46 69 67  OBJS=""...## Fig
0720: 75 72 65 20 6f 75 74 20 69 66 20 7a 6c 69 62 20  ure out if zlib 
0730: 63 6f 6d 70 69 6c 65 64 20 28 69 66 20 6e 6f 74  compiled (if not
0740: 2c 20 74 68 65 20 73 79 73 74 65 6d 20 7a 6c 69  , the system zli
0750: 62 20 77 69 6c 6c 20 62 65 20 75 73 65 64 20 61  b will be used a
0760: 6e 64 20 77 65 0a 09 23 23 20 77 69 6c 6c 20 6e  nd we..## will n
0770: 65 65 64 20 74 6f 20 68 61 76 65 20 74 68 61 74  eed to have that
0780: 20 70 72 65 73 65 6e 74 29 0a 09 5a 4c 49 42 44   present)..ZLIBD
0790: 49 52 3d 22 24 28 63 64 20 22 24 7b 4f 54 48 45  IR="$(cd "${OTHE
07a0: 52 50 4b 47 53 44 49 52 7d 2f 7a 6c 69 62 2f 69  RPKGSDIR}/zlib/i
07b0: 6e 73 74 22 20 32 3e 2f 64 65 76 2f 6e 75 6c 6c  nst" 2>/dev/null
07c0: 20 26 26 20 70 77 64 29 22 0a 09 65 78 70 6f 72   && pwd)"..expor
07d0: 74 20 5a 4c 49 42 44 49 52 0a 09 69 66 20 5b 20  t ZLIBDIR..if [ 
07e0: 2d 6e 20 22 24 7b 5a 4c 49 42 44 49 52 7d 22 20  -n "${ZLIBDIR}" 
07f0: 2d 61 20 2d 66 20 22 24 7b 5a 4c 49 42 44 49 52  -a -f "${ZLIBDIR
0800: 7d 2f 6c 69 62 2f 6c 69 62 7a 2e 61 22 20 5d 3b  }/lib/libz.a" ];
0810: 20 74 68 65 6e 0a 09 09 45 58 54 52 41 5f 4f 42   then...EXTRA_OB
0820: 4a 53 3d 22 24 7b 45 58 54 52 41 5f 4f 42 4a 53  JS="${EXTRA_OBJS
0830: 7d 20 24 7b 5a 4c 49 42 44 49 52 7d 2f 6c 69 62  } ${ZLIBDIR}/lib
0840: 2f 6c 69 62 7a 2e 61 22 0a 0a 09 09 23 23 23 20  /libz.a"....### 
0850: 41 64 64 20 6c 69 62 20 64 69 72 65 63 74 6f 72  Add lib director
0860: 79 20 66 6f 72 20 7a 6c 69 62 0a 09 09 4c 44 46  y for zlib...LDF
0870: 4c 41 47 53 3d 22 24 7b 4c 44 46 4c 41 47 53 7d  LAGS="${LDFLAGS}
0880: 20 2d 4c 24 7b 5a 4c 49 42 44 49 52 7d 2f 6c 69   -L${ZLIBDIR}/li
0890: 62 22 0a 09 09 65 78 70 6f 72 74 20 4c 44 46 4c  b"...export LDFL
08a0: 41 47 53 0a 0a 09 09 23 23 23 20 41 64 64 20 69  AGS....### Add i
08b0: 6e 63 6c 75 64 65 20 64 69 72 65 63 74 6f 72 79  nclude directory
08c0: 20 66 6f 72 20 7a 6c 69 62 0a 09 09 43 46 4c 41   for zlib...CFLA
08d0: 47 53 3d 22 24 7b 43 46 4c 41 47 53 7d 20 2d 49  GS="${CFLAGS} -I
08e0: 24 7b 5a 4c 49 42 44 49 52 7d 2f 69 6e 63 6c 75  ${ZLIBDIR}/inclu
08f0: 64 65 22 0a 09 09 43 50 50 46 4c 41 47 53 3d 22  de"...CPPFLAGS="
0900: 24 7b 43 50 50 46 4c 41 47 53 7d 20 2d 49 24 7b  ${CPPFLAGS} -I${
0910: 5a 4c 49 42 44 49 52 7d 2f 69 6e 63 6c 75 64 65  ZLIBDIR}/include
0920: 22 0a 09 09 65 78 70 6f 72 74 20 43 46 4c 41 47  "...export CFLAG
0930: 53 20 43 50 50 46 4c 41 47 53 0a 09 66 69 0a 0a  S CPPFLAGS..fi..
0940: 09 23 23 20 54 6b 20 52 65 73 6f 75 72 63 65 73  .## Tk Resources
0950: 20 28 6e 65 65 64 65 64 20 66 6f 72 20 57 69 6e   (needed for Win
0960: 33 32 20 73 75 70 70 6f 72 74 29 0a 09 54 4b 44  32 support)..TKD
0970: 49 52 3d 22 24 28 63 64 20 22 24 7b 4f 54 48 45  IR="$(cd "${OTHE
0980: 52 50 4b 47 53 44 49 52 7d 2f 74 6b 2f 69 6e 73  RPKGSDIR}/tk/ins
0990: 74 22 20 26 26 20 70 77 64 29 22 0a 09 54 4b 52  t" && pwd)"..TKR
09a0: 53 52 43 3d 22 24 7b 54 4b 44 49 52 7d 2f 6c 69  SRC="${TKDIR}/li
09b0: 62 2f 74 6b 62 61 73 65 2e 72 65 73 2e 6f 22 0a  b/tkbase.res.o".
09c0: 09 69 66 20 5b 20 2d 6e 20 22 24 7b 54 4b 44 49  .if [ -n "${TKDI
09d0: 52 7d 22 20 2d 61 20 2d 66 20 22 24 7b 54 4b 52  R}" -a -f "${TKR
09e0: 53 52 43 7d 22 20 5d 3b 20 74 68 65 6e 0a 09 09  SRC}" ]; then...
09f0: 45 58 54 52 41 5f 4f 42 4a 53 3d 22 24 7b 45 58  EXTRA_OBJS="${EX
0a00: 54 52 41 5f 4f 42 4a 53 7d 20 24 7b 54 4b 52 53  TRA_OBJS} ${TKRS
0a10: 52 43 7d 22 0a 09 66 69 0a 0a 09 23 23 20 45 78  RC}"..fi...## Ex
0a20: 70 6f 72 74 20 74 6f 20 74 68 65 20 65 6e 76 69  port to the envi
0a30: 72 6f 6e 6d 65 6e 74 2c 20 74 6f 20 62 65 20 70  ronment, to be p
0a40: 69 63 6b 65 64 20 75 70 20 62 79 20 74 68 65 20  icked up by the 
0a50: 22 63 6f 6e 66 69 67 75 72 65 22 20 73 63 72 69  "configure" scri
0a60: 70 74 0a 09 65 78 70 6f 72 74 20 45 58 54 52 41  pt..export EXTRA
0a70: 5f 4f 42 4a 53 0a 0a 09 23 20 42 75 69 6c 64 20  _OBJS...# Build 
0a80: 4b 69 74 44 4c 4c 0a 09 65 63 68 6f 20 22 52 75  KitDLL..echo "Ru
0a90: 6e 6e 69 6e 67 3a 20 2e 2f 63 6f 6e 66 69 67 75  nning: ./configu
0aa0: 72 65 20 2d 2d 77 69 74 68 2d 74 63 6c 3d 5c 22  re --with-tcl=\"
0ab0: 24 7b 54 43 4c 43 4f 4e 46 49 47 44 49 52 7d 5c  ${TCLCONFIGDIR}\
0ac0: 22 20 24 7b 43 4f 4e 46 49 47 55 52 45 45 58 54  " ${CONFIGUREEXT
0ad0: 52 41 7d 22 0a 09 2e 2f 63 6f 6e 66 69 67 75 72  RA}".../configur
0ae0: 65 20 2d 2d 77 69 74 68 2d 74 63 6c 3d 22 24 7b  e --with-tcl="${
0af0: 54 43 4c 43 4f 4e 46 49 47 44 49 52 7d 22 20 24  TCLCONFIGDIR}" $
0b00: 7b 43 4f 4e 46 49 47 55 52 45 45 58 54 52 41 7d  {CONFIGUREEXTRA}
0b10: 0a 0a 09 65 63 68 6f 20 22 52 75 6e 6e 69 6e 67  ...echo "Running
0b20: 3a 20 24 7b 4d 41 4b 45 3a 2d 6d 61 6b 65 7d 22  : ${MAKE:-make}"
0b30: 0a 09 24 7b 4d 41 4b 45 3a 2d 6d 61 6b 65 7d 20  ..${MAKE:-make} 
0b40: 54 43 4c 53 48 5f 4e 41 54 49 56 45 3d 22 24 7b  TCLSH_NATIVE="${
0b50: 54 43 4c 53 48 5f 4e 41 54 49 56 45 7d 22 20 7c  TCLSH_NATIVE}" |
0b60: 7c 20 65 78 69 74 20 31 0a 0a 09 23 20 53 74 72  | exit 1...# Str
0b70: 69 70 20 74 68 65 20 4b 69 74 44 4c 4c 20 6f 66  ip the KitDLL of
0b80: 20 64 65 62 75 67 67 69 6e 67 20 73 79 6d 62 6f   debugging symbo
0b90: 6c 73 2c 20 69 66 20 70 6f 73 73 69 62 6c 65 0a  ls, if possible.
0ba0: 09 22 24 7b 53 54 52 49 50 3a 2d 73 74 72 69 70  ."${STRIP:-strip
0bb0: 7d 22 20 2d 67 20 6c 69 62 74 63 6c 6b 69 74 2a  }" -g libtclkit*
0bc0: 20 3e 2f 64 65 76 2f 6e 75 6c 6c 20 32 3e 2f 64   >/dev/null 2>/d
0bd0: 65 76 2f 6e 75 6c 6c 0a 0a 09 23 20 46 69 78 20  ev/null...# Fix 
0be0: 75 70 20 57 69 6e 33 32 20 44 4c 4c 20 6e 61 6d  up Win32 DLL nam
0bf0: 65 73 0a 09 23 23 20 2e 44 4c 4c 2e 41 20 2d 3e  es..## .DLL.A ->
0c00: 20 2e 4c 49 42 0a 09 66 6f 72 20 66 69 6c 65 20   .LIB..for file 
0c10: 69 6e 20 6c 69 62 74 63 6c 6b 69 74 2a 2e 64 6c  in libtclkit*.dl
0c20: 6c 2e 61 3b 20 64 6f 0a 09 09 69 66 20 5b 20 21  l.a; do...if [ !
0c30: 20 2d 66 20 22 24 7b 66 69 6c 65 7d 22 20 5d 3b   -f "${file}" ];
0c40: 20 74 68 65 6e 0a 09 09 09 63 6f 6e 74 69 6e 75   then....continu
0c50: 65 0a 09 09 66 69 0a 0a 09 09 6e 65 77 66 69 6c  e...fi....newfil
0c60: 65 3d 22 24 28 62 61 73 65 6e 61 6d 65 20 22 24  e="$(basename "$
0c70: 7b 66 69 6c 65 7d 22 20 2e 64 6c 6c 2e 61 29 2e  {file}" .dll.a).
0c80: 6c 69 62 22 0a 09 09 6d 76 20 22 24 7b 66 69 6c  lib"...mv "${fil
0c90: 65 7d 22 20 22 24 7b 6e 65 77 66 69 6c 65 7d 22  e}" "${newfile}"
0ca0: 0a 09 64 6f 6e 65 0a 0a 09 23 23 20 2e 44 4c 4c  ..done...## .DLL
0cb0: 2e 44 45 46 20 2d 3e 20 2e 44 45 46 0a 09 66 6f  .DEF -> .DEF..fo
0cc0: 72 20 66 69 6c 65 20 69 6e 20 6c 69 62 74 63 6c  r file in libtcl
0cd0: 6b 69 74 2a 2e 64 6c 6c 2e 64 65 66 3b 20 64 6f  kit*.dll.def; do
0ce0: 0a 09 09 69 66 20 5b 20 21 20 2d 66 20 22 24 7b  ...if [ ! -f "${
0cf0: 66 69 6c 65 7d 22 20 5d 3b 20 74 68 65 6e 0a 09  file}" ]; then..
0d00: 09 09 63 6f 6e 74 69 6e 75 65 0a 09 09 66 69 0a  ..continue...fi.
0d10: 0a 09 09 6e 65 77 66 69 6c 65 3d 22 24 28 62 61  ...newfile="$(ba
0d20: 73 65 6e 61 6d 65 20 22 24 7b 66 69 6c 65 7d 22  sename "${file}"
0d30: 20 2e 64 6c 6c 2e 64 65 66 29 2e 64 65 66 22 0a   .dll.def).def".
0d40: 09 09 6d 76 20 22 24 7b 66 69 6c 65 7d 22 20 22  ..mv "${file}" "
0d50: 24 7b 6e 65 77 66 69 6c 65 7d 22 0a 09 64 6f 6e  ${newfile}"..don
0d60: 65 0a 0a 09 65 78 69 74 20 30 0a 29 20 7c 7c 20  e...exit 0.) || 
0d70: 65 78 69 74 20 31 0a 0a 65 78 69 74 20 30 0a     exit 1..exit 0.