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

cs: remove reference to racket_exit

Browse Source 
Was supposed to be part of 1fd516c502, but was missed because the
change wasn't saved.
This commit is contained in:
Matthew Flatt 2021-02-20 11:27:59 -07:00
parent 2239811eab
commit 95ee83e486
1 changed files with 0 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
racket/src/cs/main.sps
View File

@ -681,8 +681,6 @@
(log-message* root-logger 'debug 'GC:major msg data #f in-interrupt?))))))))))) (log-message* root-logger 'debug 'GC:major msg data #f in-interrupt?)))))))))))
(define (initialize-exit-handler!) (define (initialize-exit-handler!)
(when (foreign-entry? "racket_exit")
(#%exit-handler (foreign-procedure "racket_exit" (int) void)))
(#%exit-handler (#%exit-handler
(let ([orig (#%exit-handler)] (let ([orig (#%exit-handler)]
[root-logger (current-logger)]) [root-logger (current-logger)])