apply scheme

[Rune Zedeler]

Is it possible to set a scheme function to call every time a grob is
created so that you could do i.e.

#(define count
  (let ((next 0))
    (lambda ()
      (let ((v next))
        (set! next (+ next 1))
        v)))) 
...
c' c' c' c' c'
...
NoteHead \override #'extra-offset = #`(0 . ,(count))

resulting in c' d' e' f' g' (on the paper)

?

-Rune