#!/bin/sh

pwd	

for i in *.pas
do 
	echo $i
	./u2d < $i > ./tmpfile
	mv ./tmpfile $i 
done
