From b14262ebaf3de3380b6715046eeed56ea8df2656 Mon Sep 17 00:00:00 2001 From: Wizzup? Date: Sun, 17 Jan 2010 13:23:04 +0000 Subject: [PATCH] Compilation fix... ;) git-svn-id: http://www.villavu.com/repositories/merlijn/mufasa@422 3f818213-9676-44b0-a9b4-5e4c4e03d09d --- Units/MMLCore/dtmutil.pas | 15 ++++++--------- 1 file changed, 6 insertions(+), 9 deletions(-) diff --git a/Units/MMLCore/dtmutil.pas b/Units/MMLCore/dtmutil.pas index b556efa..f84ea8c 100644 --- a/Units/MMLCore/dtmutil.pas +++ b/Units/MMLCore/dtmutil.pas @@ -37,8 +37,7 @@ Procedure PrintpDTM(aDTM : pDTM); procedure initdtm(out d: pdtm; len: integer); function ValidMainPointBox(var dtm: pDTM; const x1, y1, x2, y2: Integer): TBox; -function ValidMainPointBoxRotated(var dtm: pDTM; const x1, y1, x2, y2: Integer; - sAngle, eAngle, aStep: Extended): TBox; +function ValidMainPointBoxRotated(var dtm: pDTM; const x1, y1, x2, y2: Integer): TBox; function DTMConsistent(var dtm: pdtm): boolean; procedure NormalizeDTM(var dtm: pdtm); @@ -239,8 +238,7 @@ begin Result.y2 := y2 - b.y2; end; -Function ValidMainPointBoxRotated(var dtm: pDTM; const x1, y1, x2, y2: Integer; - sAngle, eAngle, aStep: Extended): TBox; +Function ValidMainPointBoxRotated(var dtm: pDTM; const x1, y1, x2, y2: Integer): TBox; var i, d: Integer; @@ -253,13 +251,12 @@ begin dtm.p[0] := dtm.p[0] - dtm.p[0]; - { FIXME } for i := 0 to high(dtm.c) do begin - d := max(dtm.p[i].x - dtm.asz[i], d); - d := max(dtm.p[i].x + dtm.asz[i], d); - d := max(dtm.p[i].y - dtm.asz[i], d); - d := max(dtm.p[i].y + dtm.asz[i], d); + d := max(dtm.p[i].x - dtm.asz[i], d); + d := max(dtm.p[i].x + dtm.asz[i], d); + d := max(dtm.p[i].y - dtm.asz[i], d); + d := max(dtm.p[i].y + dtm.asz[i], d); end; Result.x1 := d;