File: generate-tcl.sh

package info (click to toggle)
git 1%3A2.51.0%2Bnext.20250825-1
  • links: PTS, VCS
  • area: main
  • in suites: experimental
  • size: 61,548 kB
  • sloc: ansic: 305,207; sh: 260,479; perl: 25,943; tcl: 21,754; makefile: 4,176; python: 3,442; javascript: 772; csh: 45
file content (11 lines) | stat: -rwxr-xr-x 196 bytes parent folder | download | duplicates (3) 
1
2
3
4
5
6
7
8
9
10
11
 
#!/bin/sh

set -e

WISH=$(echo "$1" | sed 's/|/\\|/g')
INPUT="$2"
OUTPUT="$3"

sed -e "1,3s|^exec .* \"\$0\"|exec $WISH \"\$0\"|" "$INPUT" >"$OUTPUT"+
chmod a+x "$OUTPUT"+
mv "$OUTPUT"+ "$OUTPUT"