fpc/packages/extra/forms/demo/doc2p
2002-01-29 17:54:48 +00:00

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