[CM] s7 does not measure seconds correctly

[bil at ccrma.Stanford.EDU]

argh I clicked the wrong damn button

(define (jiffies-per-second) 1000000000)
(define (current-jiffy)
   (with-let *libc*
     (let ((res (clock_gettime CLOCK_MONOTONIC)))
       (+ (* 1000000000 (cadr res)) (caddr res)))))
(define (current-second) (* 1.0 ((*libc* 'time) (c-pointer 0 
'time_t*))))