summaryrefslogtreecommitdiff
path: root/dateibeziehungen.pas
diff options
context:
space:
mode:
Diffstat (limited to 'dateibeziehungen.pas')
-rw-r--r--dateibeziehungen.pas14
1 files changed, 2 insertions, 12 deletions
diff --git a/dateibeziehungen.pas b/dateibeziehungen.pas
index d9b30dd..902f724 100644
--- a/dateibeziehungen.pas
+++ b/dateibeziehungen.pas
@@ -85,7 +85,7 @@ type
constructor create;
destructor destroy; override;
function hatQuelleVonAlsZiel(abh: tExpliziteAbhaengigkeit): boolean;
- function ersetzbarDurch(abh: tExpliziteAbhaengigkeit): boolean;
+ function ersetzbarDurch(abh: tExpliziteAbhaengigkeit): boolean; inline;
function pruefeObZuTun: boolean;
function dump: string;
end;
@@ -698,18 +698,8 @@ begin
end;
function tExpliziteAbhaengigkeit.ersetzbarDurch(abh: tExpliziteAbhaengigkeit): boolean;
-var
- i,j: longint;
begin
- result:=true;
- for i:=0 to ziele.count-1 do begin
- result:=false;
- for j:=0 to abh.ziele.count-1 do
- if abh.ziele[j].name = ziele[i].name then
- result:=true;
- if not result then
- exit;
- end;
+ result:=abh.ziele.istNamenObermengeVon(ziele);
end;
function tExpliziteAbhaengigkeit.pruefeObZuTun: boolean;