(require "mylib.ss")

(define (my-callback foo)
  (display "callback notified") (newline)
  (collect-garbage)
  #f)

(define (main)
  (add-foo-callback my-callback)
  (add-foo-callback my-callback)
  (notify-n-times 10))

(main)