~ chicken-core (chicken-5) b1e4632d0367750205bf31a100d9731063328e02

commit b1e4632d0367750205bf31a100d9731063328e02
Author:     LemonBoy <thatlemon@gmail.com>
AuthorDate: Mon Nov 6 11:14:48 2017 +0100
Commit:     Mario Domenech Goulart <mario@parenteses.org>
CommitDate: Thu Nov 9 22:02:25 2017 +0100

    Move the definition of `_ex_software'
    
    The variable is used by ##sys#reset-handler but was defined much later
    in the file, resulting in a run-time exception when csi is interrupted.
    
    Signed-off-by: Evan Hanson <evhan@foldling.org>
    Signed-off-by: Mario Domenech Goulart <mario@parenteses.org>

diff --git a/library.scm b/library.scm
index bedd7d23..cd5b8042 100644
--- a/library.scm
+++ b/library.scm
@@ -4764,6 +4764,8 @@ EOF
 
 ;;; Default handlers
 
+(define-foreign-variable _ex_software int "EX_SOFTWARE")
+
 (define exit-in-progress #f)
 
 (define exit-handler
@@ -4908,8 +4910,6 @@ EOF
 
 (define ##sys#break-on-error (foreign-value "C_enable_repl" bool))
 
-(define-foreign-variable _ex_software int "EX_SOFTWARE")
-
 (define ##sys#error-handler
   (make-parameter
    (let ([string-append string-append])