Changeset c8e35cd in OpenModelica for OMCompiler/Compiler/NFFrontEnd/NFFunction.mo

Timestamp:

2024-05-23T12:53:11+02:00 (4 weeks ago)

Author:

GitHub <noreply@…>

Branches:

master

Children:

8cc47a0c, f191ed8

Parents:

d5dbbd9b

git-author:

Per Östlund <per.ostlund@…> (05/23/24 12:53:11)

git-committer:

GitHub <noreply@…> (05/23/24 12:53:11)

Message:

Improve Base Modelica export (#12460)

• Add version header.
• Add experiment annotation.

Fixes #12457 and #12458

File:

• OMCompiler/Compiler/NFFrontEnd/NFFunction.mo (modified) (2 diffs)

OMCompiler/Compiler/NFFrontEnd/NFFunction.mo

@@ -881 +881 @@
       s := IOStream.append(s, ", ");
       s := IOStream.append(s, stringDelimitList(getDerivedInputNames(fn), ", "));
-      s := FlatModelicaUtil.appendComment(SCodeUtil.getElementComment(InstNode.definition(fn.node)), s);
+      s := FlatModelicaUtil.appendComment(SCodeUtil.getElementComment(InstNode.definition(fn.node)),
+        NFFlatModelicaUtil.ElementType.FUNCTION, s);
       s := IOStream.append(s, ")");
     else
@@ -931 +932 @@
       if not SCodeUtil.emptyModOrEquality(annMod) then
         cmt := SCode.COMMENT(SOME(SCode.ANNOTATION(annMod)), NONE());
-        s := FlatModelicaUtil.appendCommentAnnotation(SOME(cmt), indent + "  ", ";\n", s);
+        s := FlatModelicaUtil.appendCommentAnnotation(SOME(cmt),
+          NFFlatModelicaUtil.ElementType.FUNCTION, indent + "  ", ";\n", s);
       end if;