File: tcl9.patch

package info (click to toggle)
tcllib 2.0%2Bdfsg-5
  • links: PTS, VCS
  • area: main
  • in suites: forky, sid
  • size: 83,560 kB
  • sloc: tcl: 306,798; ansic: 14,272; sh: 3,035; xml: 1,766; yacc: 1,157; pascal: 881; makefile: 124; perl: 84; f90: 84; python: 33; ruby: 13; php: 11
file content (19 lines) | stat: -rw-r--r-- 740 bytes parent folder | download | duplicates (2)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
From: Sergei Golovan
Subject: Debian-specific patch which makes sak.tcl call the critcl
 binary as tclsh8.6 /usr/bin/critcl or as tclsh9.0 /usr/bin/critcl
 in order to build tcllibc both for Tcl 8.6 and 9.0.
Date: Wed, 23 Apr 2025 01:27:06 +0300

--- a/sak.tcl
+++ b/sak.tcl
@@ -1693,8 +1693,8 @@
     if {"-pkg"    ni $extra} { lappend extra -pkg    [list $pkg]    }
     
     catch {
-        puts "$critcl -cache [pwd]/.critcl -force $extra $files"
-        eval exec $critcl -cache [pwd]/.critcl -force $extra $files 
+        puts "[info nameofexecutable] $critcl -cache [pwd]/.critcl -force $extra $files"
+        eval exec [info nameofexecutable] $critcl -cache [pwd]/.critcl -force $extra $files
     } r
     puts $r
     return