fix(parser): preproc operator mixed with line cont

The logical operator `&&` present in the preprocessor
expressions interfered with the line continuation operator
`&` thus resulting into invalid syntax

Fixed #398

Author: gnikit

fortls/parsers/internal/parser.py

@@ -1104,6 +1104,9 @@ def get_code_line(
                     elif next_line != "":
                         post_lines[-1] = next_line[:iAmper]
                     next_line = self.get_line(line_ind, pp_content)
+                    if next_line is None:
+                        break
+
                     line_ind += 1
                     # Skip any preprocessor statements when seeking the next line
                     if FRegex.PP_ANY.match(next_line):

test/test_parser.py

@@ -48,3 +48,12 @@ def test_end_scopes_semicolon():
     ast = file.parse()
     assert err_str is None
     assert not ast.end_errors
+
+
+def test_weird_parser_bug():
+    file_path = test_dir / "parse" / "mixed" / "preproc_and_normal_syntax.F90"
+    file = FortranFile(str(file_path))
+    err_str, _ = file.load_from_disk()
+    ast = file.parse()
+    assert err_str is None
+    assert not ast.end_errors

test/test_source/.fortls

@@ -10,6 +10,7 @@
     "docs",
     "rename",
     "parse",
+    "parse/mixed/**",
     "vis"
   ]
 

test/test_source/parse/.fortls

@@ -0,0 +1,5 @@
+{
+  "excl_paths": [
+    "mixed"
+  ]
+}

test/test_source/parse/mixed/preproc_and_normal_syntax.F90

@@ -0,0 +1,5 @@
+
+  USE base_hooks
+#if VAR < 8 || VAR == 8 && VAR2 < 3
+#define OMP_DEFAULT_NONE_WITH_OOP NONE
+#endif