Explorar o código

* bug fix in test taddbool.pp - it was testing longbool conversion to boolean
twice, and not testing wordbool conversion to boolean at all

Nikolay Nikolov %!s(int64=4) %!d(string=hai) anos
pai
achega
9aefda1e6a
Modificáronse 1 ficheiros con 2 adicións e 2 borrados
  1. 2 2
      tests/test/cg/taddbool.pp

+ 2 - 2
tests/test/cg/taddbool.pp

@@ -881,8 +881,8 @@ Begin
    Fail;
  Write('wordbool conversion to boolean...');
  result := TRUE;
- move(values,lb1,sizeof(lb1));
- if lb1 <> TRUE then
+ move(values,wb1,sizeof(wb1));
+ if wb1 <> TRUE then
     result := false;
  if result then
     WriteLn('Success.')