Preliminary fix for #1630

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