Update Bind.hs

Add the case when the first element of the first declrs tuple is Nothing
 into extractCompType's case matching.