#!/bin/dash

export PATH=$PATH:/bin:/usr/bin

vdir=`dirname $1` 
cdir=`pwd`
cd $vdir
/usr/bin/fpc -O3 -vw0 -dONLINE_JUDGE -Sd -omain -MDelphi `basename $1` >&2
cd $cdir
shift
exec "$vdir/main" "$@"