Megatest: .mtutil.scm at [5574ded5f0]

File .mtutil.scm artifact dc76b9e3b2 part of check-in 5574ded5f0


;; example of how to set up and write target mappers
;;
(define *target-mappers*
  `((prefix-contour      . ,(lambda (target run-name area area-path reason contour mode-patt)
			      (conc contour "/" target)))
    (prefix-area-contour . ,(lambda (target run-name area area-path reason contour mode-patt)
			      (conc area "/" contour "/" target)))))
  

;; (print "Yep, got here!")