issue #8867 Fortran source file that contains the character literal "…

…import" or 'import'

Problem is that a bit a greedy rule:
```
<*>"import"{BS}/"\n"                    |
<*>"import"{BS_}                        {
```
though in this case we should have used a specific rule for a `String`, by rejecting the match in case of a `String` we will get the correct results.

src/fortrancode.l

@@ -376,6 +376,7 @@ LANGUAGE_BIND_SPEC BIND{BS}"("{BS}C{BS}(,{BS}NAME{BS}"="{BS}"\""(.*)"\""{BS})?")
                                         }
 <*>"import"{BS}/"\n"                    |
 <*>"import"{BS_}                        {
+                                          if (YY_START == String) REJECT;
                                           startFontClass(yyscanner,"keywordtype");
                                           codifyLines(yyscanner,yytext);
                                           endFontClass(yyscanner);