aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authork-m_schindler <k-m_schindler@b956fd51-792f-4845-bead-9b4dfca2ff2c>2010-03-08 17:06:15 +0000
committerk-m_schindler <k-m_schindler@b956fd51-792f-4845-bead-9b4dfca2ff2c>2010-03-08 17:06:15 +0000
commitd2e8b131a46cb875cc200868cf06fd5a7d7c7b08 (patch)
treed677768b650458711a519236e3304fea013700bd
parent2a25aa524f166365813bcfd62635817a7f320a96 (diff)
downloadusdx-d2e8b131a46cb875cc200868cf06fd5a7d7c7b08.tar.gz
usdx-d2e8b131a46cb875cc200868cf06fd5a7d7c7b08.tar.xz
usdx-d2e8b131a46cb875cc200868cf06fd5a7d7c7b08.zip
set only the exception mask as necessary.
git-svn-id: svn://svn.code.sf.net/p/ultrastardx/svn/trunk@2185 b956fd51-792f-4845-bead-9b4dfca2ff2c
-rw-r--r--test/TestPortAudioDevice.pas3
1 files changed, 1 insertions, 2 deletions
diff --git a/test/TestPortAudioDevice.pas b/test/TestPortAudioDevice.pas
index ff5b70bc..1308858f 100644
--- a/test/TestPortAudioDevice.pas
+++ b/test/TestPortAudioDevice.pas
@@ -365,8 +365,7 @@ begin
writeln ('Sample rate: ', sampleRate:5:0, ' : Error: ', Pa_GetErrorText(PaError));
{$IF Defined(DARWIN)} // floating point exceptions are raised. Therefore, set the exception mask.
- SetExceptionMask([exInvalidOp, exDenormalized, exZeroDivide,
- exOverflow, exUnderflow, exPrecision]);
+ SetExceptionMask([exZeroDivide, exPrecision]);
{$IFEND}
for j := low(standardSampleRates) to high(standardSampleRates) do
begin