suzanne.soy/racket
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

fix yet another mistake in atomic-mode implementation

Browse Source
This commit is contained in:
Matthew Flatt 2010-10-25 09:29:02 -06:00
parent d2275f4179
commit 20ab31743d
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
collects/ffi/unsafe/atomic.rkt
View File

@ -118,9 +118,9 @@
(loop (sub1 i))))) (loop (sub1 i)))))
f f
(lambda () (lambda ()
(start-breakable-atomic)
(set! old-paramz paramz) (set! old-paramz paramz)
(set! old-break-paramz break-paramz) (set! old-break-paramz break-paramz)
(start-breakable-atomic)
(let loop ([i extra-depth]) (let loop ([i extra-depth])
(unless (zero? i) (unless (zero? i)
(start-breakable-atomic) (start-breakable-atomic)