[Committed] PR Fortran/83741 -- Check for NULL pointer

[Steve Kargl]

Committed as obvious.  Forgot the testcase. I'll commit that shortly.

2018-01-08  Steven G. Kargl  <ka...@gcc.gnu.org>

        * match.c (gfc_match_allocate): Check for NULL pointer.

Index: match.c
===================================================================
--- match.c     (revision 256363)
+++ match.c     (working copy)
@@ -4071,7 +4071,7 @@ gfc_match_allocate (void)
         for which the corresponding type parameter is assumed.  */
       if (saw_assumed
          && (tail->expr->ts.deferred
-             || tail->expr->ts.u.cl->length
+             || (tail->expr->ts.u.cl && tail->expr->ts.u.cl->length)
              || tail->expr->symtree->n.sym->attr.dummy == 0))
        {
          gfc_error ("Incompatible allocate-object at %C for CHARACTER "

-- 
Steve