* convert filename para to shortstring

git-svn-id: trunk@4870 -

compiler/ncginl.pas

@@ -188,7 +188,7 @@ implementation
        { First call secondpass() before we can push the parameters, otherwise
          parameters allocated in the registers can be destroyed }
        { generate filename string parameter }
-       hp2:=cstringconstnode.createstr(current_module.sourcefiles.get_file_name(aktfilepos.fileindex));
+       hp2:=ctypeconvnode.create(cstringconstnode.createstr(current_module.sourcefiles.get_file_name(aktfilepos.fileindex)),cshortstringtype);
        firstpass(hp2);
        secondpass(hp2);
        if codegenerror then