* Optimized Handle_I8086_Error by using smaller int types.

git-svn-id: trunk@46335 -

rtl/i8086/math.inc

@@ -42,10 +42,10 @@
     procedure Handle_I8086_Error(InterruptNumber : dword); public name 'FPC_HANDLE_I8086_ERROR';
       var
         FpuStatus : word;
-        OutError : dword;
+        OutError : byte;
       begin
         OutError:=InterruptNumber;
-        case InterruptNumber of
+        case byte(InterruptNumber) of
          0 : OutError:=200;    {'Division by Zero'}
          5 : OutError:=201;    {'Bounds Check', not caught yet }
          12 : OutError:=202;   {'Stack Fault', not caught yet }