Megatest

<verbatim>
WARNING: Test test_mt_vars appears to be dead. Forcing it to state INCOMPLETE and status STUCK/DEAD

Error: too few arguments - received 5 but expected 6: #<procedure (tests:test-set-status! run-id446 test-id447 state448 status449 comment450 dat451 . tmp445452)>

        Call history:

        db.scm:1737: regex#string-substitute      
        db.scm:1736: base64#base64-decode         
        db.scm:1735: with-input-from-string       
        db.scm:1739: s11n#deserialize     
        runs.scm:1071: g1467      
        runs.scm:1072: file-exists?       
        runs.scm:1073: change-directory   
        runs.scm:1080: g1476      
        runs.scm:1080: string->symbol     
        runs.scm:1154: current-seconds    
        runs.scm:1154: g1568      
        runs.scm:1155: g1571      
        runs.scm:1158: debug:print        
        common_records.scm:51: debug:debug-mode   
        common_records.scm:52: with-output-to-port        
        runs.scm:1159: tests:test-set-status!           <--
Press any key to continue
</verbatim>

Error: too few arguments - received 5 but expected 6: #<procedure (tests:test-set-status!