瀏覽代碼

fppu.pas, tppumodule.readsourcefiles:
set "temp" string to a useful value if "sources_avail" is "false" as otherwise
garbage is printed if "-vu" is given

git-svn-id: trunk@21733 -

svenbarth 13 年之前
父節點
當前提交
378dd7d6ab
共有 1 個文件被更改,包括 3 次插入1 次删除
  1. 3 1
      compiler/fppu.pas

+ 3 - 1
compiler/fppu.pas

@@ -795,7 +795,9 @@ var
                   { the indexing is wrong here PM }
                   sourcefiles.register_file(hp);
                 end;
-             end;
+             end
+           else
+             temp:=' not available';
            if is_main then
              begin
                mainsource:=hs;