FIX: returning same status code across all systems

related to: Oldes/Rebol-issues#2215
resolves: Oldes/Rebol-issues#2470

Author: Oldes

src/os/host-main.c

@@ -346,7 +346,8 @@ int main(int argc, char **argv) {
 		)
 	){
 		if (n < 0 && !(Main_Args.options & RO_HALT)) {
-			RL_Do_String(b_cast("unless system/options/quiet [print {^[[mClosing in 3s!} wait 3] quit/return -1"), 0, 0);
+			RL_Do_String(b_cast("unless system/options/quiet [print {^[[mClosing in 3s!} wait 3]"), 0, 0);
+			OS_Exit(-n);
 		}
 		Host_Repl();
 	}

src/tests/units/call-test.r3

@@ -85,8 +85,8 @@ rebol-cmd: func[cmd][
 
 	--test-- "Error printed to stderr"
 		;@@ https://github.com/Oldes/Rebol-issues/issues/1862
-		--assert 0 <> rebol-cmd {--do "prin 1 1 / 0"} ; returned number is not same across all systems!
-		--assert "1" = out-buffer
+		--assert 1 = rebol-cmd {--do "prin 2 1 / 0"}
+		--assert "2" = out-buffer
 		--assert not none? find err-buffer "Math error"