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
treed08188ec959c11f5698b6555895ff2300e6d77ac
parent878e299e821d90179394013eced01a01f9209406
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