Megatest

Diff
Login

Differences From Artifact [578d748d14]:

To Artifact [267351f3b9]:


655
656
657
658
659
660
661
662
663
664
665
666
667
668
669
670
671
672
		   (exit 1))))
	   homehost-required))))

;;======================================================================
;; Misc setup stuff
;;======================================================================

(debug:setup (cond
	      ((args:get-arg "-debug-noprop") 'noprop)
	      ((args:get-arg "-debug")         #t)
	      (else #f)))

;; (if (args:get-arg "-logging")(set! *logging* #t))

;;(if (debug:debug-mode 3) ;; we are obviously debugging
;;    (set! open-run-close open-run-close-no-exception-handling))

(if (args:get-arg "-itempatt")







|
<
<
<







655
656
657
658
659
660
661
662



663
664
665
666
667
668
669
		   (exit 1))))
	   homehost-required))))

;;======================================================================
;; Misc setup stuff
;;======================================================================

(common:debug-setup)




;; (if (args:get-arg "-logging")(set! *logging* #t))

;;(if (debug:debug-mode 3) ;; we are obviously debugging
;;    (set! open-run-close open-run-close-no-exception-handling))

(if (args:get-arg "-itempatt")