#(define stick-tab-engraver
   (list
     (cons 'acknowledgers
       (list
         (cons 'string-number-interface
               (lambda (engraver grob source-engraver)
                   ;; TODO: get string-number info and store in var
                   (display "getting STRING info\n")
                   ))

         (cons 'finger-interface
               (lambda (engraver grob source-engraver)
                   ;; TODO: get fingering info and store in var
                   (display "getting FINGER info\n")
                   ))

         (cons 'stem-interface
               (lambda (engraver grob source-engraver)
                   ;; TODO: get stem direction info and store in var
                   (display "getting STEM info\n")
                   ))

         (cons 'note-head-interface
               (lambda (engraver grob source-engraver)
                   ;; TODO: replace the note head
                   (do-something grob)))))))

#(define (do-something grob)
   (display "Replacing note head\n"))


% --------------------------------------------------


\version "2.14.2"

\score {
  <<
    \time 2/4
    \new Staff {
      \clef "treble"
      \key g \minor
      \new Voice {
        \relative c'' {
          d4-1\4
        }
      }
    }
    \new Staff {
      \clef "bass"
      \key g \minor
      \new Voice {
        \relative g {
          % ugh, articulations only exist when
          % there are simultaneous notes
          d-2\10
        }
      }
    }
  >>

  \layout {
    \context {
      \Staff
      \remove "Fingering_engraver"
      \consists \stick-tab-engraver
    }
  }
}