Avoid warning on non-i386 CPUs

git-svn-id: trunk@19594 -

packages/gdbint/src/gdbint.pp

@@ -2658,6 +2658,8 @@ function MaskAllFPUExceptions(control : TFPUState) : TFPUState;
 begin
 {$ifdef cpui386}
   MaskAllFPUExceptions := control or MaskAllExceptions;
+{$else}
+  MaskAllFPUExceptions:=0;
 {$endif}
 end;