]> birchwood-abbey.net Git - mit-scheme.git/commit
projects / mit-scheme.git / commit
? search:
summary | shortlog | log | commit | commitdiff | tree
(parent: 878e299) | patch
Mark floenv in use so exceptions stay cleared if preempted.
authorTaylor R Campbell <campbell@mumble.net>
Tue, 3 Sep 2019 13:37:25 +0000 (13:37 +0000)
committerTaylor R Campbell <campbell@mumble.net>
Tue, 3 Sep 2019 13:37:25 +0000 (13:37 +0000)
commitcb5cf4cd56029fe987108ce7d22493840957b143
treed08188ec959c11f5698b6555895ff2300e6d77actree | snapshot
parent878e299e821d90179394013eced01a01f9209406commit | diff
Mark floenv in use so exceptions stay cleared if preempted.

Otherwise, we might do:

T1: clear-float-exceptions
    preempt and switch
T2: floating-point operation that raises exceptions
    preempt and switch
T1: use-floating-point-environment!

and the exceptions may remain raised from T2.
src/runtime/floenv.scm diff | blob | history
MIT/GNU Scheme is an implementation of the Scheme programming