mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-05-14 18:12:34 +02:00
13 lines
221 B
Tcsh
13 lines
221 B
Tcsh
#!/bin/csh
|
|
set fromext = $1
|
|
set toext = $2
|
|
shift
|
|
shift
|
|
foreach f ( $* )
|
|
set fromname = `basename $f $fromext`$fromext
|
|
if ( $f == $fromname ) then
|
|
set toname = `basename $f $fromext`$toext
|
|
mv $f $toname
|
|
endif
|
|
end
|