Fix to handle comments in include

sintefmath · Mar 7, 2024 · 0a0541a · 0a0541a
1 parent 2a0fce2
commit 0a0541a
Showing 1 changed file with 7 additions and 2 deletions.
diff --git a/src/InputParser/parser.jl b/src/InputParser/parser.jl
@@ -176,14 +176,19 @@ function parse_data_file!(outer_data, filename, data = outer_data;
                 data = new_section(outer_data, m)
                 skip_mode = m in skip
             elseif m == :INCLUDE
-                next = strip(readline(f))
+                next = readline(f)
+                if occursin("--", next)
+                    # Strip comments
+                    next = next[1:findfirst("--", next)[1]-1]
+                end
+                next = strip(next)
                 if endswith(next, '/')
                     next = rstrip(next, '/')
                 else
                     readline(f)
                 end
                 include_path = clean_include_path(basedir, next)
-                parser_message(cfg, outer_data, "$m", "Including file: $include_path. Basedir: $basedir with INCLUDE = $next)")
+                parser_message(cfg, outer_data, "$m", "Including file: $include_path. Basedir: $basedir with INCLUDE = $next")
                 parse_data_file!(
                     outer_data, include_path, data,
                     verbose = verbose,