소스 검색

* ignore tf_no_backquote_support in source_info.flags in case we will link
on the target system (-St command line option during cross-compiling)

git-svn-id: trunk@20817 -

Jonas Maebe 13 년 전
부모
커밋
ddde9760c2
1개의 변경된 파일2개의 추가작업 그리고 1개의 파일을 삭제
  1. 2 1
      compiler/link.pas

+ 2 - 1
compiler/link.pas

@@ -678,7 +678,8 @@ Implementation
         f : text;
         st : string;
       begin
-        if not (tf_no_backquote_support in source_info.flags) then
+        if not (tf_no_backquote_support in source_info.flags) or
+           (cs_link_on_target in current_settings.globalswitches) then
            begin
              CatFileContent:='`cat '+MaybeQuoted(para)+'`';
              Exit;