#!/bin/bash
if runghc $1 2>&1 | grep -q ":.*:.*:"
then
    #echo error
	runghc $1
else
    #echo ok
    exit 0
fi