Fix infinite loop in the diff algorithm

OpenModelica · Mar 25, 2021 · 0054f58 · 0054f58
1 parent 0755bfc
commit 0054f58
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/OMCompiler/Compiler/Parsers/SimpleModelicaParser.mo b/OMCompiler/Compiler/Parsers/SimpleModelicaParser.mo
@@ -2195,7 +2195,7 @@ algorithm
         guard min(parseTreeIsWhitespaceOrParNotComment(t) for t in tree)
         algorithm
           diff := (Diff.Equal, tree)::diff1::diff;
-        then diffLocal;
+        then {};
       case ((diff1 as (Diff.Equal,tree1 as (_::_)))::(Diff.Delete, tree)::(diffLocal as ((Diff.Equal,tree2 as (_::_))::_)))
         guard needsWhitespaceBetweenTokens(lastToken(List.last(tree1)), firstTokenInTree(listGet(tree2, 1)))
         algorithm