From 187c85df028195fb8426168bd49a5ccc4e4e8296 Mon Sep 17 00:00:00 2001
From: Andreas Kloeckner <inform@tiker.net>
Date: Fri, 12 Jun 2015 09:57:17 -0500
Subject: [PATCH] Provide better error message if Fortran parser bails

---
 loopy/frontend/fortran/__init__.py | 4 ++++
 1 file changed, 4 insertions(+)

diff --git a/loopy/frontend/fortran/__init__.py b/loopy/frontend/fortran/__init__.py
index bd798966d..8ce7a75e7 100644
--- a/loopy/frontend/fortran/__init__.py
+++ b/loopy/frontend/fortran/__init__.py
@@ -219,6 +219,10 @@ def parse_fortran(source, filename="<floopy code>", free_form=True, strict=True)
     tree = api.parse(source, isfree=free_form, isstrict=strict,
             analyze=False, ignore_comments=False)
 
+    if tree is None:
+        raise LoopyError("Fortran parser was unhappy with source code "
+                "and returned invalid data (Sorry!)")
+
     from loopy.frontend.fortran.translator import F2LoopyTranslator
     f2loopy = F2LoopyTranslator(filename)
     f2loopy(tree)
-- 
GitLab