Fix for loadFileInteractiveQualified.mos

git-svn-id: https://openmodelica.org/svn/OpenModelica/trunk@15106 f25d12d1-65f4-0310-ae8a-bbce733d8d8e
OpenModelica · Feb 8, 2013 · 85a9944 · 85a9944
1 parent f252efb
commit 85a9944
Showing 1 changed file with 4 additions and 0 deletions.
diff --git a/Compiler/Script/Interactive.mo b/Compiler/Script/Interactive.mo
@@ -5346,6 +5346,7 @@ algorithm
         p_class = Absyn.crefToPath(class_);
         cdef = getPathedClassInProgram(p_class, p);
         Absyn.CLASS(name = id,info = Absyn.INFO(fileName = filename,isReadOnly = isReadOnly,lineNumberStart = sline,columnNumberStart = scol,lineNumberEnd = eline,columnNumberEnd = ecol)) = cdef;
+        filename = Util.testsuiteFriendly(filename);
         str_sline = intString(sline);
         str_scol = intString(scol);
         str_eline = intString(eline);
@@ -5475,6 +5476,7 @@ algorithm
         element_str = stringAppendList(
           {"elementtype=classdef, classname=",id,
           ", classrestriction=",str_restriction});
+        file = Util.testsuiteFriendly(file);
         sline_str = intString(sline);
         scol_str = intString(scol);
         eline_str = intString(eline);
@@ -5499,6 +5501,7 @@ algorithm
         eline_str = intString(eline);
         ecol_str = intString(ecol);
         readonly_str = selectString(isReadOnly, "readonly", "writable");
+        file = Util.testsuiteFriendly(file);
         str = stringAppendList(
           {"elementfile=\"",file,"\", elementreadonly=\"",
           readonly_str,"\", elementStartLine=",sline_str,", elementStartColumn=",scol_str,
@@ -8486,6 +8489,7 @@ algorithm
   str_scol := intString(sc);
   str_eline := intString(el);
   str_ecol := intString(ec);
+  file := Util.testsuiteFriendly(file);
   res_1 := stringAppendList(
           {"{ rec(name=\"",name,"\", partial=",strPartial,", final=",
           strFinal,", encapsulated=",strEncapsulated,", restriction=",res,", comment=\"",