Megatest

Diff
Login

Differences From Artifact [52e9d5c82a]:

To Artifact [e8b477af90]:


802
803
804
805
806
807
808


809
810
811
812
813
814
815
802
803
804
805
806
807
808
809
810
811
812
813
814
815
816
817







+
+







;;======================================================================
;; Exit and clean up
;;======================================================================

(if (not *didsomething*)
    (debug:print 0 help))

;; (if *runremote* (rpc:close-all-connections!))
    
(if (not (eq? *globalexitstatus* 0))
    (if (or (args:get-arg "-runtests")(args:get-arg "-runall"))
        (begin
           (debug:print 0 "NOTE: Subprocesses with non-zero exit code detected: " *globalexitstatus*)
           (exit 0))
        (case *globalexitstatus*
         ((0)(exit 0))