OpenCores
URL https://opencores.org/ocsvn/or1k/or1k/trunk

Subversion Repositories or1k

[/] [or1k/] [trunk/] [insight/] [expect/] [fixline1] - Blame information for rev 1778

Go to most recent revision | Details | Compare with Previous | View Log

Line No. Rev Author Line
1 578 markom
#!expect --
2
# Synopsis: fixline1 newpath < input > output
3
# Author: Don Libes
4
 
5
# Description: change first line of script to reflect new binary
6
# try to match any of the following first lines
7
#!expect ...
8
#!../expect ...
9
#!expectk ...
10
#!foo/bar/expectk ...
11
#
12
regsub "^#!(.*/)*(.*)" [gets stdin] "#!$argv/\\2" line1
13
puts -nonewline "$line1\n[read stdin]"

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.