* fixed compilation after r14177

git-svn-id: trunk@14180 -

tests/test/units/math/tmask.inc

@@ -18,9 +18,9 @@ if not caught then
 
 writeln('Masking exceptions');
 
-writeln(integer(SetExceptionMask([exDenormalized,exInvalidOp,exOverflow,exPrecision,exUnderflow,exZeroDivide])));  //Returns 61, as expected
+writeln(byte(SetExceptionMask([exDenormalized,exInvalidOp,exOverflow,exPrecision,exUnderflow,exZeroDivide])));  //Returns 61, as expected
 writeln(integer(GetExceptionMask));  //Returns 4 - unexpected???
-writeln(integer([exZeroDivide]));    //Returns 4
+writeln(byte([exZeroDivide]));    //Returns 4
 
 caught := false;
 try
@@ -39,7 +39,7 @@ if caught then
 
 writeln(integer(SetExceptionMask([exDenormalized,exInvalidOp,exOverflow,exPrecision,exUnderflow])));  //Returns 61, as expected
 writeln(integer(GetExceptionMask));  //Returns 4 - unexpected???
-writeln(integer([exZeroDivide]));    //Returns 4
+writeln(byte([exZeroDivide]));    //Returns 4
 
 caught := false;