Index: dashboard-tests.scm
==================================================================
--- dashboard-tests.scm
+++ dashboard-tests.scm
@@ -359,11 +359,11 @@
 				    #:expand "YES"
 				    #:multiline "YES"
 				    #:font "Courier New, -10")))
 		  (hash-table-set! widgets "Test Steps" (lambda (testdat)
 							  (let* ((currval (iup:attribute stepsdat "VALUE")) ;; "TITLE"))
-								 (fmtstr  "~25a~10a~10a~15a~20a")
+								 (fmtstr  "~25a~10a~10a~15a~15a")
 								 (comprsteps (db:get-steps-table db test-id))
 								 (newval  (string-intersperse 
 									   (append
 									    (list 
 									     (format #f fmtstr "Stepname" "Start" "End"    "Status" "Time")
@@ -374,12 +374,12 @@
 											   (vector-ref x 0)
 											   (let ((s (vector-ref x 1)))
 											     (if (number? s)(seconds->time-string s) s))
 											   (let ((s (vector-ref x 2)))
 											     (if (number? s)(seconds->time-string s) s))
-											   (vector-ref x 3)
-											   (vector-ref x 4)))
+											   (vector-ref x 3)    ;; status
+											   (vector-ref x 4)))  ;; time delta
 										 (sort (hash-table-values comprsteps)
 										       (lambda (a b)
 											 (if (and (number? a)(number? b))
 											     (< (vector-ref a 1)(vector-ref b 1))
 											     #t)))))

Index: db.scm
==================================================================
--- db.scm
+++ db.scm
@@ -648,10 +648,16 @@
 (define-inline (db:steps-table-get-stepname   vec)    (vector-ref  vec 0))
 (define-inline (db:steps-table-get-start      vec)    (vector-ref  vec 1))
 (define-inline (db:steps-table-get-end        vec)    (vector-ref  vec 2))
 (define-inline (db:steps-table-get-status     vec)    (vector-ref  vec 3))
 (define-inline (db:steps-table-get-runtime    vec)    (vector-ref  vec 4))
+(define-inline (db:step-stable-set-stepname!  vec val)(vector-set! vec 0 val))
+(define-inline (db:step-stable-set-start!     vec val)(vector-set! vec 1 val))
+(define-inline (db:step-stable-set-end!       vec val)(vector-set! vec 2 val))
+(define-inline (db:step-stable-set-status!    vec val)(vector-set! vec 3 val))
+(define-inline (db:step-stable-set-runtime!   vec val)(vector-set! vec 4 val))
+
 
 ;; get a pretty table to summarize steps
 ;;
 (define (db:get-steps-table db test-id)
   (let ((steps   (db:get-steps-for-test db test-id)))

Index: tests/tests/sqlitespeed/runscript.rb
==================================================================
--- tests/tests/sqlitespeed/runscript.rb
+++ tests/tests/sqlitespeed/runscript.rb
@@ -27,11 +27,10 @@
 if status==0
   status='pass'
 else
   status='fail'
 end
-
 
 record_step("add #{num_records}","end",status)