From ec12eb659d8c8e78ad4bb15d1a941ac3153a0f66 Mon Sep 17 00:00:00 2001
From: albert-github <albert.tests@gmail.com>
Date: Fri, 18 Aug 2017 11:52:28 +0200
Subject: [PATCH] Bug 786409 - parsing error in Fortran file with preprocessing

the // is in Fortran the indication for string concatenation and not for comment and should thus be ignored during, Fortran, preprocessing
---
 src/pre.l | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/pre.l b/src/pre.l
index 4c4763d214f..40842f413a3 100644
--- a/src/pre.l
+++ b/src/pre.l
@@ -2902,7 +2902,7 @@ CHARLIT   (("'"\\[0-7]{1,3}"'")|("'"\\."'")|("'"[^'\\\n]{1,4}"'"))
                                           }
   					}
 <*>"//"[/]?				{
-                                          if (YY_START==SkipVerbatim || YY_START==SkipCond)
+                                          if (YY_START==SkipVerbatim || YY_START==SkipCond || getLanguageFromFileName(g_yyFileName)==SrcLangExt_Fortran)
                                           {
                                             REJECT;
                                           }