加入 Gitee
与超过 1200万 开发者一起发现、参与优秀开源项目,私有仓库也完全免费 :)
免费加入
文件
克隆/下载
fix-makefile 544 Bytes
一键复制 编辑 原始数据 按行查看 历史
王小彬同学 提交于 2022-10-27 14:59 . init
#!/bin/sh
# the next line restarts using tclsh \
exec tclsh "$0" "$@"
set makefileName [lindex $argv 0]
set tmpfileName /tmp/rsftmp
set inFid [open $makefileName r]
set outFid [open $tmpfileName w]
while {![eof $inFid]} {
set line [gets $inFid]
if {[string match *\)\$* $line]} {
set pos [string first \)\$ $line]
set prefix [string range $line 0 $pos]
incr pos
set suffix [string range $line $pos end]
set line $prefix\ $suffix
}
puts $outFid $line
}
close $inFid
close $outFid
file rename -force $tmpfileName $makefileName
Loading...
马建仓 AI 助手
尝试更多
代码解读
代码找茬
代码优化