diff options
| author | Alberto Ruiz <aruiz@um.es> | 2007-09-28 07:37:49 +0000 |
|---|---|---|
| committer | Alberto Ruiz <aruiz@um.es> | 2007-09-28 07:37:49 +0000 |
| commit | 74e7d42263b196c22d1f5da3d51beec69071600d (patch) | |
| tree | 04dd5cd4ef4e22dfd114a6739c9ed39bdaf6f26b /lib/GSL/Special.hs | |
| parent | 0198366bba7a5f2d67338633f9eb90889ffc31b2 (diff) | |
save work
Diffstat (limited to 'lib/GSL/Special.hs')
| -rw-r--r-- | lib/GSL/Special.hs | 6 |
1 files changed, 0 insertions, 6 deletions
diff --git a/lib/GSL/Special.hs b/lib/GSL/Special.hs index bdee1b2..fa002b9 100644 --- a/lib/GSL/Special.hs +++ b/lib/GSL/Special.hs | |||
| @@ -41,7 +41,6 @@ module GSL.Special ( | |||
| 41 | , module GSL.Special.Synchrotron | 41 | , module GSL.Special.Synchrotron |
| 42 | , module GSL.Special.Trig | 42 | , module GSL.Special.Trig |
| 43 | , module GSL.Special.Zeta | 43 | , module GSL.Special.Zeta |
| 44 | , setErrorHandlerOff | ||
| 45 | ) | 44 | ) |
| 46 | where | 45 | where |
| 47 | 46 | ||
| @@ -73,8 +72,3 @@ import GSL.Special.Psi | |||
| 73 | import GSL.Special.Synchrotron | 72 | import GSL.Special.Synchrotron |
| 74 | import GSL.Special.Trig | 73 | import GSL.Special.Trig |
| 75 | import GSL.Special.Zeta | 74 | import GSL.Special.Zeta |
| 76 | |||
| 77 | |||
| 78 | -- | This action removes the GSL default error handler which aborts the program, so that | ||
| 79 | -- GSL errors can be handled by Haskell (using Control.Exception) and ghci doesn't abort. | ||
| 80 | foreign import ccall "gsl-aux.h no_abort_on_error" setErrorHandlerOff :: IO () | ||