#lang racket

(require racket/gui)

(module+ main
  (define frame (new frame% [label "Bug: crashing scrollbars"]))
  (define box (new list-box%
                   [label #f]
                   [choices (list "A" "B")]
                   [parent  frame]))
  (send frame show #t))

;; after hovering over the scrollbar with the mouse:
;; Gtk: _gtk_css_image_get_concrete_size: assertion 'default_width > 0' failed
;; Gtk: _gtk_css_image_get_surface: assertion 'surface_width > 0' failed
;; SIGSEGV MAPERR si_code 1 fault on addr 0x1c
;; [1]    4105 abort (core dumped)  racket gtkbug.rkt