summaryrefslogtreecommitdiff
path: root/packages/libndsfpc/examples/graphics/Sprites/allocation_test/AllocationTest.pp
diff options
context:
space:
mode:
Diffstat (limited to 'packages/libndsfpc/examples/graphics/Sprites/allocation_test/AllocationTest.pp')
-rw-r--r--packages/libndsfpc/examples/graphics/Sprites/allocation_test/AllocationTest.pp11
1 files changed, 7 insertions, 4 deletions
diff --git a/packages/libndsfpc/examples/graphics/Sprites/allocation_test/AllocationTest.pp b/packages/libndsfpc/examples/graphics/Sprites/allocation_test/AllocationTest.pp
index 0da475774d..9a61e009d4 100644
--- a/packages/libndsfpc/examples/graphics/Sprites/allocation_test/AllocationTest.pp
+++ b/packages/libndsfpc/examples/graphics/Sprites/allocation_test/AllocationTest.pp
@@ -180,6 +180,7 @@ end;
var
memUsageTemp: longint;// = $FFFFFFFF;
+ keys: integer;
begin
randomize;
@@ -226,7 +227,9 @@ begin
updateSprites();
swiWaitForVBlank();
-
+ scanKeys();
+ keys := keysDown();
+ if (keys and KEY_START) <> 0 then break;
//api: updates real oam memory
oamUpdate(oam^);
@@ -236,9 +239,9 @@ begin
consoleClear();
- printf('Memory usage: %i %i%% '#10, spriteMemoryUsage, 100 * spriteMemoryUsage div (spriteMemSize));
- printf('Percentage fail: %i%% '#10, oomCount * 100 div allocationCount);
- printf('Lowest Usage at fail %i %i%% '#10, memUsageTemp, 100 * memUsageTemp div (spriteMemSize));
+ printf('Memory usage: %li %li%% '#10, spriteMemoryUsage, 100 * spriteMemoryUsage div (spriteMemSize));
+ printf('Percentage fail: %li%% '#10, oomCount * 100 div allocationCount);
+ printf('Lowest Usage at fail %li %li%% '#10, memUsageTemp, 100 * memUsageTemp div (spriteMemSize));
end;
end.