Megatest

Check-in [c1e7660763]
Login
Overview
Comment:Fixed subrun test
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | v1.65
Files: files | file ages | folders
SHA1: c1e7660763b4416639fb0e35b58f290da1a854e5
User & Date: ritikaag on 2018-06-22 12:30:38
Other Links: branch diff | manifest | tags
Context
2018-06-26
15:22
Changed mis-spelling in error message for envdelta check-in: 6139430731 user: jmoon18 tags: v1.65
2018-06-22
12:30
Fixed subrun test check-in: c1e7660763 user: ritikaag tags: v1.65
2018-06-20
16:51
fix to honor reruns count from config check-in: c260f8f3ea user: pjhatwal tags: v1.65
Changes

Modified subrun.scm from [f622aaf2d4] to [31c8151de1].

79
80
81
82
83
84
85
86

87
88
89
90
91
92
93
  (let ((ra (configf:lookup testconfig "subrun" "run-area"))
        (logpro (configf:lookup testconfig "subrun" "logpro"))
        (symlink-target (conc test-run-dir "/subrun-area"))
        )
  (when (not ra)      ;; when runarea is not set we default to *toppath*. However 
              ;; we need to force the setting in the testconfig so it will
          ;; be preserved in the testconfig.subrun file
      (configf:set-section-var testconfig "subrun" "runarea" *toppath*))

    (configf:set-section-var testconfig "logpro" "subrun" logpro) ;; append the logpro rules to the logpro section as stepname subrun

    (if (common:file-exists? symlink-target)
        (delete-file symlink-target))
    
    (create-symbolic-link ra symlink-target)








|
>







79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
  (let ((ra (configf:lookup testconfig "subrun" "run-area"))
        (logpro (configf:lookup testconfig "subrun" "logpro"))
        (symlink-target (conc test-run-dir "/subrun-area"))
        )
  (when (not ra)      ;; when runarea is not set we default to *toppath*. However 
              ;; we need to force the setting in the testconfig so it will
          ;; be preserved in the testconfig.subrun file
      (configf:set-section-var testconfig "subrun" "run-area" *toppath*)
      (set! ra *toppath*))
    (configf:set-section-var testconfig "logpro" "subrun" logpro) ;; append the logpro rules to the logpro section as stepname subrun

    (if (common:file-exists? symlink-target)
        (delete-file symlink-target))
    
    (create-symbolic-link ra symlink-target)