2
0
mirror of https://github.com/dpethes/rerogue.git synced 2025-06-07 18:58:32 +02:00

terrain viewer: fix tile block memory allocation

This commit is contained in:
dpethes 2020-06-15 13:28:02 +02:00
parent 6cc0c327ff
commit cd9780147c
2 changed files with 1 additions and 4 deletions

View File

@ -133,7 +133,7 @@ var
blk: TTerrainBlock; blk: TTerrainBlock;
tile: TTile; tile: TTile;
begin begin
SetLength(blocks, terrain.TileWidth, terrain.TileHeight); SetLength(blocks, terrain.TileHeight, terrain.TileWidth);
for y := 0 to terrain.TileHeight - 1 do begin for y := 0 to terrain.TileHeight - 1 do begin
for x := 0 to terrain.TileWidth - 1 do begin for x := 0 to terrain.TileWidth - 1 do begin
tile_idx := terrain.heightmap.blk[y * terrain.TileWidth + x]; tile_idx := terrain.heightmap.blk[y * terrain.TileWidth + x];

View File

@ -130,10 +130,7 @@
</CodeGeneration> </CodeGeneration>
<Linking> <Linking>
<Debugging> <Debugging>
<DebugInfoType Value="dsDwarf2Set"/>
<UseHeaptrc Value="True"/>
<TrashVariables Value="True"/> <TrashVariables Value="True"/>
<UseExternalDbgSyms Value="True"/>
</Debugging> </Debugging>
</Linking> </Linking>
</CompilerOptions> </CompilerOptions>