Megatest

Check-in [8fb8c24288]
Login
Overview
Comment:added setting of MT_CMDINFO in launch-test
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | v1.65
Files: files | file ages | folders
SHA1: 8fb8c24288309ca266268037d4d069fd7e38e454
User & Date: mmgraham on 2022-02-04 15:58:07
Other Links: branch diff | manifest | tags
Context
2022-02-16
19:24
Changed megatest version to 1.6589 check-in: d82cbc8d90 user: mmgraham tags: v1.65, v1.6589
18:27
Create branch Closed-Leaf check-in: 12d54f9c05 user: matt tags: v1.65, v1.70
2022-02-04
15:58
added setting of MT_CMDINFO in launch-test check-in: 8fb8c24288 user: mmgraham tags: v1.65
2022-01-07
12:10
made missing waiton detection messages more useful check-in: 8b8b1f63e7 user: mmgraham tags: v1.65
Changes

Modified launch.scm from [b0b1044b95] to [d3e491e9d3].

1536
1537
1538
1539
1540
1541
1542


1543
1544
1545
1546
1547
1548
1549
					(list 'target    mt_target)
					(list 'contour   contour)
					(list 'runtlim   (if run-time-limit (common:hms-string->seconds run-time-limit) #f))
					(list 'env-ovrd  (hash-table-ref/default *configdat* "env-override" '())) 
					(list 'set-vars  (if params (hash-table-ref/default params "-setvars" #f)))
					(list 'runname   runname)
					(list 'mt-bindir-path mt-bindir-path))))))))


      
      ;; clean out step records from previous run if they exist
      ;; (rmt:delete-test-step-records run-id test-id)
      ;; if the dir does not exist we may have a itempath where individual variables are a path, launch anyway
      (if (common:file-exists? work-area)
	  (change-directory work-area)) ;; so that log files from the launch process don't clutter the test dir
      (cond







>
>







1536
1537
1538
1539
1540
1541
1542
1543
1544
1545
1546
1547
1548
1549
1550
1551
					(list 'target    mt_target)
					(list 'contour   contour)
					(list 'runtlim   (if run-time-limit (common:hms-string->seconds run-time-limit) #f))
					(list 'env-ovrd  (hash-table-ref/default *configdat* "env-override" '())) 
					(list 'set-vars  (if params (hash-table-ref/default params "-setvars" #f)))
					(list 'runname   runname)
					(list 'mt-bindir-path mt-bindir-path))))))))

        (setenv "MT_CMDINFO" cmdparms)  ;; setting this for use in nblauncher
      
      ;; clean out step records from previous run if they exist
      ;; (rmt:delete-test-step-records run-id test-id)
      ;; if the dir does not exist we may have a itempath where individual variables are a path, launch anyway
      (if (common:file-exists? work-area)
	  (change-directory work-area)) ;; so that log files from the launch process don't clutter the test dir
      (cond