make the new variants temporary unavailable

This commit is contained in:
ronaldhordijk
2005-06-19 05:47:55 +00:00
parent 11a7b08bc3
commit 0ded6d7136
12 changed files with 147 additions and 111 deletions

View File

@ -33,7 +33,7 @@ procedure UnpackVariations(v: integer);
var
i: integer;
begin
for i := 0 to NVARS - 1 do
for i := 0 to NRVAR - 1 do
Variations[i] := boolean(v shr i and 1);
end;