浏览代码

* fix compilation error

git-svn-id: trunk@14273 -
pierre 15 年之前
父节点
当前提交
679309704a
共有 1 个文件被更改,包括 1 次插入0 次删除
  1. 1 0
      compiler/systems/t_sunos.pas

+ 1 - 0
compiler/systems/t_sunos.pas

@@ -563,6 +563,7 @@ end;
 Function TLinkersolaris.MakeSharedLibrary:boolean;
 Function TLinkersolaris.MakeSharedLibrary:boolean;
 var
 var
   binstr,
   binstr,
+  s, linkstr,
   cmdstr  : TCmdStr;
   cmdstr  : TCmdStr;
   success : boolean;
   success : boolean;
 begin
 begin