about summary refs log tree commit diff
diff options
context:
space:
mode:
authorPeter Hofmann <scm@uninformativ.de>2023-07-31 18:47:24 +0200
committerLeah Neukirchen <leah@vuxu.org>2023-07-31 19:38:25 +0200
commit07f49e77aa5b99f57e1ee1fe9306fc0fa9abc409 (patch)
tree054f42cd5104a541ed4f872b49d8f47d7d34a289
parentec71c8cc68f2e21da27642a815c1ab291f085ac9 (diff)
downloaddosfetch-07f49e77aa5b99f57e1ee1fe9306fc0fa9abc409.tar.gz
dosfetch-07f49e77aa5b99f57e1ee1fe9306fc0fa9abc409.tar.xz
dosfetch-07f49e77aa5b99f57e1ee1fe9306fc0fa9abc409.zip
disksize(): Treat registers as unsigned integers HEAD master
This should fix some of the negative numbers that we're seeing.
-rw-r--r--dosfetch.pas2
1 files changed, 1 insertions, 1 deletions
diff --git a/dosfetch.pas b/dosfetch.pas
index 55c094f..bc236a1 100644
--- a/dosfetch.pas
+++ b/dosfetch.pas
@@ -70,7 +70,7 @@ begin
 end;
 
 procedure disksize(disk: byte);
-var a, b, c, d : integer;
+var a, b, c, d : word;
    total, free : longint;
 begin
    asm