projects / mit-scheme.git / commit
? search:
summary | shortlog | log | commit | commitdiff | tree
(parent: fe96fc3) | patch
ffi: Avoid most longjmps in C-CALL primitive (callout_continue).
authorMatt Birkholz <matt@birkholz.chandler.az.us>
Tue, 19 Nov 2013 23:18:45 +0000 (16:18 -0700)
committerMatt Birkholz <matt@birkholz.chandler.az.us>
Tue, 19 Nov 2013 23:18:45 +0000 (16:18 -0700)
commit0edec7e30d49b91476d8e70c261ee140232a3ef2
treedc7415cc11deee2acf3e8f7ff3354c203eac63fftree | snapshot
parentfe96fc3c811dd7161bf20c7b2d2a26364ad3ea8ccommit | diff
ffi: Avoid most longjmps in C-CALL primitive (callout_continue).

Rather than abort after every callout (in callout_continue), call the
second trampoline directly, after unsealing the Scheme stack.
src/ffi/generator.scm diff | blob | history
src/microcode/pruxffi.c diff | blob | history
src/microcode/pruxffi.h diff | blob | history
MIT/GNU Scheme, Pucked