File: generate-tcl.sh

package info (click to toggle)
cgit 1.2.3%2Bgit20250818.80.3346409%2Bgit2.51.0-1
  • links: PTS, VCS
  • area: main
  • in suites: forky, sid
  • size: 58,624 kB
  • sloc: ansic: 313,383; sh: 260,576; perl: 25,871; tcl: 21,754; makefile: 4,192; python: 3,787; javascript: 810; 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"