myriad/languages/pascal/run.sh

cat > program.pas

# fpc does not use stderr, ld however does, capture both
res="$(fpc program.pas 2>&1)"

if [ $? -eq 0 ]; then
    ./program || true
else
    printf %s "$res"
fi
eval: limit docker output to not run out of memory 2020-06-07 09:43:41 +02:00			`cat > program.pas`
Initial commit 2019-07-09 11:19:41 +02:00
			`# fpc does not use stderr, ld however does, capture both`
			`res="$(fpc program.pas 2>&1)"`

			`if [ $? -eq 0 ]; then`
			`./program \|\| true`
			`else`
			`printf %s "$res"`
			`fi`