mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-07-16 00:45:56 +02:00
12 lines
229 B
Tcsh
12 lines
229 B
Tcsh
#!/bin/csh
|
|
# Simple script to do some VERY basic c->pascal conversions.
|
|
#
|
|
foreach f ( $1 )
|
|
sed s/\\\"/\\\'/g <$f | sed s/\\\/\\\*/\{/g |sed s/\\\*\\\//\}/g |\
|
|
sed s/\ =\ /\ :=\ /g | sed s/-\>/\\^\\\./g >`basename $f .c`.pp
|
|
|
|
|
|
|
|
|
|
|