refs #1147: fixed r6580

git-svn-id: https://svn.modelica.org/projects/Modelica/trunk@6581 7ce873d0-865f-4ce7-a662-4bb36ea78beb