1
0
mirror of https://github.com/moparisthebest/Simba synced 2024-11-29 04:22:16 -05:00

Minor fix. var -> out so it won't throw a warning.

git-svn-id: http://www.villavu.com/repositories/merlijn/mufasa@262 3f818213-9676-44b0-a9b4-5e4c4e03d09d
This commit is contained in:
Wizzup? 2009-12-02 00:30:05 +00:00
parent 260eaf5f57
commit e5fd4f2702

View File

@ -35,7 +35,7 @@ Function pDTMToTDTM(Const DTM: pDTM): TDTM;
Function tDTMTopDTM(Const DTM: TDTM): pDTM; Function tDTMTopDTM(Const DTM: TDTM): pDTM;
Procedure PrintpDTM(tDTM : pDTM); Procedure PrintpDTM(tDTM : pDTM);
procedure initdtm(var d: pdtm; len: integer); procedure initdtm(out d: pdtm; len: integer);
function ValidMainPointBox(var dtm: pDTM; const x1, y1, x2, y2: Integer): TBox; function ValidMainPointBox(var dtm: pDTM; const x1, y1, x2, y2: Integer): TBox;
function ValidMainPointBoxRotated(var dtm: pDTM; const x1, y1, x2, y2: Integer): TBox; function ValidMainPointBoxRotated(var dtm: pDTM; const x1, y1, x2, y2: Integer): TBox;
function DTMConsistent(var dtm: pdtm): boolean; function DTMConsistent(var dtm: pdtm): boolean;
@ -52,7 +52,7 @@ implementation
uses math; uses math;
// macro // macro
procedure initdtm(var d: pdtm; len: integer); procedure initdtm(out d: pdtm; len: integer);
var var
i: integer; i: integer;
begin begin